All public logs
Jump to navigation
Jump to search
Combined display of all available logs of 太極. You can narrow down the view by selecting a log type, the username (case-sensitive), or the affected page (also case-sensitive).
- 16:17, 12 August 2023 Brb talk contribs uploaded File:Dend12.png ({{Pre}} set.seed(123) dat <- matrix(rnorm(20), ncol=2) # perform hierarchical clustering hc <- hclust(dist(dat)) # plot dendrogram plot(hc) # get ordering of leaves ord <- order.dendrogram(as.dendrogram(hc)) ord # [1] 8 3 6 5 10 1 9 7 2 4 # Same as seen on the dendrogram nodes # Rotate the branches (1,9) & (7,2,4) plot(rotate(hc, c("8", "3", "6", "5", "10", "7", "2", "4", "1", "9")), main="Rotated") </pre>)
- 16:17, 12 August 2023 Brb talk contribs created page File:Dend12.png ({{Pre}} set.seed(123) dat <- matrix(rnorm(20), ncol=2) # perform hierarchical clustering hc <- hclust(dist(dat)) # plot dendrogram plot(hc) # get ordering of leaves ord <- order.dendrogram(as.dendrogram(hc)) ord # [1] 8 3 6 5 10 1 9 7 2 4 # Same as seen on the dendrogram nodes # Rotate the branches (1,9) & (7,2,4) plot(rotate(hc, c("8", "3", "6", "5", "10", "7", "2", "4", "1", "9")), main="Rotated") </pre>)
- 16:39, 6 August 2023 Brb talk contribs uploaded File:Plotly3d.png
- 16:39, 6 August 2023 Brb talk contribs created page File:Plotly3d.png
- 19:06, 5 August 2023 Brb talk contribs created page Delta (Created page with "Delta method * https://en.wikipedia.org/wiki/Delta_method * R examples. ** Var(xbar/ybar) https://gist.github.com/arraytools/c39f52b9280f4f1858da83a6bc60f185.")
- 15:39, 31 July 2023 Brb talk contribs uploaded File:Filter single.png
- 15:39, 31 July 2023 Brb talk contribs created page File:Filter single.png
- 11:25, 1 July 2023 Brb talk contribs created page Smartctl (Created page with "= NVME = <pre> $ smartctl -v | head -1 smartctl 7.2 2020-12-30 r5155 [x86_64-linux-5.19.0-46-generic] (local build) </pre> <pre> $ sudo smartctl -a /dev/nvme0 smartctl 7.2 2020-12-30 r5155 [x86_64-linux-5.19.0-46-generic] (local build) Copyright (C) 2002-20, Bruce Allen, Christian Franke, www.smartmontools.org === START OF INFORMATION SECTION === Model Number: CT1000P3SSD8 Serial Number: 2314E6C4100F Firmware Version:...")
- 12:47, 27 May 2023 Brb talk contribs uploaded File:Vibrant ink rstheme.png (https://github.com/captaincaed/rstudio/blob/main/vibrant_ink_SB_2.rstheme)
- 12:47, 27 May 2023 Brb talk contribs created page File:Vibrant ink rstheme.png (https://github.com/captaincaed/rstudio/blob/main/vibrant_ink_SB_2.rstheme)
- 13:46, 21 May 2023 Brb talk contribs uploaded File:R2.png (<syntaxhighlight lang='rsplus'> x <- seq(0, 2.5, length=20) y <- sin(x) plot(x, y) abline(lsfit(x, y, intercept = F), col = 'red') summary(fit)$r.squared # [1] 0.8554949 </syntaxhighlight>)
- 13:46, 21 May 2023 Brb talk contribs created page File:R2.png (<syntaxhighlight lang='rsplus'> x <- seq(0, 2.5, length=20) y <- sin(x) plot(x, y) abline(lsfit(x, y, intercept = F), col = 'red') summary(fit)$r.squared # [1] 0.8554949 </syntaxhighlight>)
- 16:02, 11 May 2023 Brb talk contribs uploaded File:Paletteggplot2.png
- 16:02, 11 May 2023 Brb talk contribs created page File:Paletteggplot2.png
- 12:12, 10 May 2023 Brb talk contribs uploaded File:Paletteshowcol.png
- 12:12, 10 May 2023 Brb talk contribs created page File:Paletteshowcol.png
- 11:15, 10 May 2023 Brb talk contribs uploaded File:Palettebarplot.png (<syntaxhighlight lang='rsplus'> pal <- c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3", "#FF7F00") # pal <- sample(colors(), 10) # randomly pick 10 colors barplot(rep(1, length(pal)), col = pal, space = 0, axes = FALSE, border = NA) </syntaxhighlight>)
- 11:15, 10 May 2023 Brb talk contribs created page File:Palettebarplot.png (<syntaxhighlight lang='rsplus'> pal <- c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3", "#FF7F00") # pal <- sample(colors(), 10) # randomly pick 10 colors barplot(rep(1, length(pal)), col = pal, space = 0, axes = FALSE, border = NA) </syntaxhighlight>)
- 11:14, 10 May 2023 Brb talk contribs uploaded File:Paletteheatmap.png (<syntaxhighlight lang='rsplus'> pal <- c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3", "#FF7F00") pal <- matrix(pal, nr=2) # acknowledge a nice warning message pal_matrix <- matrix(seq_along(pal), nr=nrow(pal), nc=ncol(pal)) heatmap(pal_matrix, col = pal, Rowv = NA, Colv = NA, scale = "none", ylab = "", xlab = "", main = "", margins = c(5, 5)) # 2 rows, 3 columns with labeling on two axes </syntaxhighlight>)
- 11:14, 10 May 2023 Brb talk contribs created page File:Paletteheatmap.png (<syntaxhighlight lang='rsplus'> pal <- c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3", "#FF7F00") pal <- matrix(pal, nr=2) # acknowledge a nice warning message pal_matrix <- matrix(seq_along(pal), nr=nrow(pal), nc=ncol(pal)) heatmap(pal_matrix, col = pal, Rowv = NA, Colv = NA, scale = "none", ylab = "", xlab = "", main = "", margins = c(5, 5)) # 2 rows, 3 columns with labeling on two axes </syntaxhighlight>)