Main public logs

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).

• 10:48, 1 December 2025 Brb talk contribs created page File:Dendro colorbars.png (<syntaxhighlight lang='r'> library(ComplexHeatmap) library(circlize) library(RColorBrewer) set.seed(123) # --- Example data (10 samples) --- mat <- matrix(rnorm(30), nrow = 10) rownames(mat) <- paste0("Sample", 1:10) mat[1:5, ] <- mat[1:5, ] mat[6:10, ] <- mat[6:10, ] + 2 # Cluster on samples (rows) hc <- hclust(dist(mat)) # Annotations in ORIGINAL sample order groups <- rep(c("A", "B"), each = 5) score <- seq(0, 1, length = 10) cl2 <- cutree(hc, 2) cl3 <- cutree(hc, 3) cl4 <- cutree(hc,...)
• 10:48, 1 December 2025 Brb talk contribs uploaded File:Dendro colorbars.png (<syntaxhighlight lang='r'> library(ComplexHeatmap) library(circlize) library(RColorBrewer) set.seed(123) # --- Example data (10 samples) --- mat <- matrix(rnorm(30), nrow = 10) rownames(mat) <- paste0("Sample", 1:10) mat[1:5, ] <- mat[1:5, ] mat[6:10, ] <- mat[6:10, ] + 2 # Cluster on samples (rows) hc <- hclust(dist(mat)) # Annotations in ORIGINAL sample order groups <- rep(c("A", "B"), each = 5) score <- seq(0, 1, length = 10) cl2 <- cutree(hc, 2) cl3 <- cutree(hc, 3) cl4 <- cutree(hc,...)
• 17:16, 10 November 2025 Brb talk contribs created page File:Umap-iris.png (<syntaxhighlight lang='r'> library(umap) # Load the built-in Iris dataset data(iris) # Separate the features (variables) from the species labels iris_features <- iris[, 1:4] iris_species <- iris[, 5] # Run UMAP, reducing the 4 dimensions down to 2 # n_neighbors: Controls how UMAP balances local vs. global structure. # min_dist: Controls how tightly points are packed together. iris_umap_results <- umap(iris_features, random_state = 42) # The result is a list. The actual 2D coordinates are...)
• 17:16, 10 November 2025 Brb talk contribs uploaded File:Umap-iris.png (<syntaxhighlight lang='r'> library(umap) # Load the built-in Iris dataset data(iris) # Separate the features (variables) from the species labels iris_features <- iris[, 1:4] iris_species <- iris[, 5] # Run UMAP, reducing the 4 dimensions down to 2 # n_neighbors: Controls how UMAP balances local vs. global structure. # min_dist: Controls how tightly points are packed together. iris_umap_results <- umap(iris_features, random_state = 42) # The result is a list. The actual 2D coordinates are...)
• 19:07, 28 October 2025 Brb talk contribs created page File:Paletteer d.png (<syntaxhighlight lang='r'> paletteer_d("RColorBrewer::RdBu") #<colors> #67001FFF #B2182BFF #D6604DFF #F4A582FF #FDDBC7FF #F7F7F7FF #D1E5F0FF #92C5DEFF #4393C3FF #2166ACFF #053061FF paletteer_d("ggsci::uniform_startrek") # <colors> #CC0C00FF #5C88DAFF #84BD00FF #FFCD00FF #7C878EFF #00B5E2FF #00AF66FF </syntaxhighlight>)
• 19:07, 28 October 2025 Brb talk contribs uploaded File:Paletteer d.png (<syntaxhighlight lang='r'> paletteer_d("RColorBrewer::RdBu") #<colors> #67001FFF #B2182BFF #D6604DFF #F4A582FF #FDDBC7FF #F7F7F7FF #D1E5F0FF #92C5DEFF #4393C3FF #2166ACFF #053061FF paletteer_d("ggsci::uniform_startrek") # <colors> #CC0C00FF #5C88DAFF #84BD00FF #FFCD00FF #7C878EFF #00B5E2FF #00AF66FF </syntaxhighlight>)
• 11:26, 9 October 2025 Brb talk contribs created page Mediawiki-docker (Created page with "= Directories = * Backup directory '''~/backups''' * Mediawiki directory '''~/mediawiki-docker''' = Accounts = * Note the mediawiki admin and user accounts are embedded in the SQL database. * DB account (defined in compose.yml and LocalSettings.php): ** database: wikidb ($wgDBname) ** user: ($wgDBuser) ** password: ($wgDBpassword) * Mediawiki admin: * Mediawiki user: = Backup = Assume the mediawiki directory on the host is '''/var/www/html/wiki''' <ul> <li>MySQL <...")
• 15:12, 4 October 2025 Brb talk contribs created page File:Massage.png
• 15:12, 4 October 2025 Brb talk contribs uploaded File:Massage.png
• 14:57, 8 September 2025 Brb talk contribs created page File:MacSettingKeyboardShortcut.png
• 14:57, 8 September 2025 Brb talk contribs uploaded File:MacSettingKeyboardShortcut.png
• 14:56, 8 September 2025 Brb talk contribs created page File:MacSettingLiveCaption.png
• 14:56, 8 September 2025 Brb talk contribs uploaded File:MacSettingLiveCaption.png
• 09:17, 7 August 2025 Brb talk contribs created page File:Heatmap-gaps.png (<syntaxhighlight lang='r'> # 1. Prepare the data set.seed(42) mat = matrix(rnorm(30, mean = 0, sd = 1.2), nrow = 5, ncol = 6) mat[2, 1] = -2.5 mat[2, 6] = 2.5 mat[1, 2] = -1.8 mat[4, 4] = 1.8 # 2. Define the color palette library(circlize) col_fun = colorRamp2(c(-2.5, 0, 2.5), c("steelblue", "white", "darkred")) # 3. Create the heatmap object library(ComplexHeatmap) ht = Heatmap( mat, col = col_fun, cluster_rows = FALSE, cluster_columns = FALSE, show_row_names = FALSE, show_colu...)
• 09:17, 7 August 2025 Brb talk contribs uploaded File:Heatmap-gaps.png (<syntaxhighlight lang='r'> # 1. Prepare the data set.seed(42) mat = matrix(rnorm(30, mean = 0, sd = 1.2), nrow = 5, ncol = 6) mat[2, 1] = -2.5 mat[2, 6] = 2.5 mat[1, 2] = -1.8 mat[4, 4] = 1.8 # 2. Define the color palette library(circlize) col_fun = colorRamp2(c(-2.5, 0, 2.5), c("steelblue", "white", "darkred")) # 3. Create the heatmap object library(ComplexHeatmap) ht = Heatmap( mat, col = col_fun, cluster_rows = FALSE, cluster_columns = FALSE, show_row_names = FALSE, show_colu...)
• 14:18, 29 July 2025 Brb talk contribs created page File:Inkscape-heatmap.svg
• 14:18, 29 July 2025 Brb talk contribs uploaded File:Inkscape-heatmap.svg
• 08:16, 19 July 2025 Brb talk contribs created page File:NemoCaja.png
• 08:16, 19 July 2025 Brb talk contribs uploaded File:NemoCaja.png
• 16:25, 5 July 2025 Brb talk contribs created page File:Cinnamon.png
• 16:25, 5 July 2025 Brb talk contribs uploaded File:Cinnamon.png
• 16:18, 5 July 2025 Brb talk contribs created page File:MATE.png
• 16:18, 5 July 2025 Brb talk contribs uploaded File:MATE.png
• 16:13, 5 July 2025 Brb talk contribs created page File:GNOME.png
• 16:13, 5 July 2025 Brb talk contribs uploaded File:GNOME.png
• 16:06, 5 July 2025 Brb talk contribs created page File:KDE.png
• 16:06, 5 July 2025 Brb talk contribs uploaded File:KDE.png
• 15:52, 5 July 2025 Brb talk contribs created page File:LXDE.png
• 15:52, 5 July 2025 Brb talk contribs uploaded File:LXDE.png
• 15:52, 5 July 2025 Brb talk contribs created page File:Xfce.png
• 15:52, 5 July 2025 Brb talk contribs uploaded File:Xfce.png
• 15:50, 5 July 2025 Brb talk contribs created page File:LXQt.png
• 15:50, 5 July 2025 Brb talk contribs uploaded File:LXQt.png
• 14:16, 2 July 2025 Brb talk contribs created page File:Palbarplot.png
• 14:16, 2 July 2025 Brb talk contribs uploaded File:Palbarplot.png
• 08:07, 13 June 2025 Brb talk contribs created page File:Cauchyos install.png
• 08:07, 13 June 2025 Brb talk contribs uploaded File:Cauchyos install.png
• 12:44, 20 May 2025 Brb talk contribs created page File:Combat DE mod.png (Demonstrate the importance of the 'mod' parameter in sva::ComBat() <syntaxhighlight lang='r'> library(sva) library(limma) library(ggplot2) library(tidyr) set.seed(42) n_genes <- 100 n_samples <- 20 # Group: 10 Case and 10 Control — spread across batches group <- sample(rep(c("Control", "Case"), each=10)) # now randomized batch <- rep(c(1, 2), each=10) # Simulate expression data expr <- matrix(rnorm(n_genes * n_samples, mean=5, sd=1), nrow=n_genes) # Add true signal to 10 genes for Case...)
• 12:44, 20 May 2025 Brb talk contribs uploaded File:Combat DE mod.png (Demonstrate the importance of the 'mod' parameter in sva::ComBat() <syntaxhighlight lang='r'> library(sva) library(limma) library(ggplot2) library(tidyr) set.seed(42) n_genes <- 100 n_samples <- 20 # Group: 10 Case and 10 Control — spread across batches group <- sample(rep(c("Control", "Case"), each=10)) # now randomized batch <- rep(c(1, 2), each=10) # Simulate expression data expr <- matrix(rnorm(n_genes * n_samples, mean=5, sd=1), nrow=n_genes) # Add true signal to 10 genes for Case...)
• 20:47, 17 May 2025 Brb talk contribs created page File:Twoway.png (<syntaxhighlight lang='r'> png("~/Downloads/twoway.png", width=8, height=6, units="in",res=300) par(mar = c(8, 4, 4, 2)) boxplot(y ~ treatment * timepoint, data = df, col = c("skyblue", "lightgreen", "lightpink"), main = "Plant Growth by Treatment and Timepoint", xlab = "", ylab = "Plant Height", xaxt = "n") # Add rotated x-axis labels labels <- levels(interaction(df$treatment, df$timepoint)) axis(1, at = 1:length(labels), labels = FALSE) # Add ticks without labels...)
• 20:47, 17 May 2025 Brb talk contribs uploaded File:Twoway.png (<syntaxhighlight lang='r'> png("~/Downloads/twoway.png", width=8, height=6, units="in",res=300) par(mar = c(8, 4, 4, 2)) boxplot(y ~ treatment * timepoint, data = df, col = c("skyblue", "lightgreen", "lightpink"), main = "Plant Growth by Treatment and Timepoint", xlab = "", ylab = "Plant Height", xaxt = "n") # Add rotated x-axis labels labels <- levels(interaction(df$treatment, df$timepoint)) axis(1, at = 1:length(labels), labels = FALSE) # Add ticks without labels...)
• 12:33, 17 April 2025 Brb talk contribs created page File:Groupjitterboxplot.png (<syntaxhighlight lang='r'> library(ggplot2) library(dplyr) # Create a sample dataset with large sample size set.seed(42) n_per_group <- 500 # 500 samples per group and category combination (2000 total) data <- data.frame( A = rep(c("Group1", "Group2"), each = n_per_group * 2), B = c(rnorm(n_per_group, 10, 2), rnorm(n_per_group, 8, 1.5), # Group1: Category1, Category2 rnorm(n_per_group, 12, 2.5), rnorm(n_per_group, 14, 2)), # Group2: Category1, Category2 F = rep(rep(c("Categ...)
• 12:33, 17 April 2025 Brb talk contribs uploaded File:Groupjitterboxplot.png (<syntaxhighlight lang='r'> library(ggplot2) library(dplyr) # Create a sample dataset with large sample size set.seed(42) n_per_group <- 500 # 500 samples per group and category combination (2000 total) data <- data.frame( A = rep(c("Group1", "Group2"), each = n_per_group * 2), B = c(rnorm(n_per_group, 10, 2), rnorm(n_per_group, 8, 1.5), # Group1: Category1, Category2 rnorm(n_per_group, 12, 2.5), rnorm(n_per_group, 14, 2)), # Group2: Category1, Category2 F = rep(rep(c("Categ...)
• 18:19, 8 February 2025 Brb talk contribs created page Retropie (Redirected page to RetroPie) Tag: New redirect
• 16:37, 31 January 2025 Brb talk contribs created page File:Heatmapcolparam.png (<syntaxhighlight lang='r'> library(ComplexHeatmap) library(circlize) # Create a sample 5x5 matrix with values from -4 to 4 set.seed(123) # for reproducibility example_matrix <- matrix(runif(25, -4, 4), nrow = 5) colnames(example_matrix) <- paste0("Col", 1:5) rownames(example_matrix) <- paste0("Row", 1:5) # Define the color function that truncates at -2 and 2 col_fun <- colorRamp2(c(-2, 0, 2), c("blue", "white", "red")) # Plot the heatmap without truncating the data heatmap1 <- Heatmap(exa...)
• 16:37, 31 January 2025 Brb talk contribs uploaded File:Heatmapcolparam.png (<syntaxhighlight lang='r'> library(ComplexHeatmap) library(circlize) # Create a sample 5x5 matrix with values from -4 to 4 set.seed(123) # for reproducibility example_matrix <- matrix(runif(25, -4, 4), nrow = 5) colnames(example_matrix) <- paste0("Col", 1:5) rownames(example_matrix) <- paste0("Row", 1:5) # Define the color function that truncates at -2 and 2 col_fun <- colorRamp2(c(-2, 0, 2), c("blue", "white", "red")) # Plot the heatmap without truncating the data heatmap1 <- Heatmap(exa...)
• 18:37, 11 January 2025 Brb talk contribs uploaded a new version of File:Scale color identity.png
• 18:33, 11 January 2025 Brb talk contribs created page File:Scale color identity.png (<syntaxhighlight lang='r'> library(ggplot2) library(patchwork) # Data for the plots data <- data.frame( x = 1:3, y = c(5, 10, 15), color = c("#FF0000", "#00FF00", "#0000FF") # Actual color codes ) # Plot 1: Without scale_color_identity() plot1 <- ggplot(data, aes(x = x, y = y, color = color)) + geom_point(size = 5) + ggtitle("Without scale_color_identity()") # Plot 2: With scale_color_identity() plot2 <- ggplot(data, aes(x = x, y = y, color = color)) + geom_point(size = 5) +...)
• 18:33, 11 January 2025 Brb talk contribs uploaded File:Scale color identity.png (<syntaxhighlight lang='r'> library(ggplot2) library(patchwork) # Data for the plots data <- data.frame( x = 1:3, y = c(5, 10, 15), color = c("#FF0000", "#00FF00", "#0000FF") # Actual color codes ) # Plot 1: Without scale_color_identity() plot1 <- ggplot(data, aes(x = x, y = y, color = color)) + geom_point(size = 5) + ggtitle("Without scale_color_identity()") # Plot 2: With scale_color_identity() plot2 <- ggplot(data, aes(x = x, y = y, color = color)) + geom_point(size = 5) +...)
• 13:58, 30 December 2024 Brb talk contribs created page Router (Created page with "= OPNSense = * [https://youtu.be/Qrglquxw-6I OPNSense - a powerful, open source, network firewall and router] 4/19/2022 * [https://youtu.be/gCYPd4qSgjE Building a Business - Ep. 2: Installing OPNSense or pfSense as our Firewall and Router.] 9/4/2022 * [https://youtu.be/y6Ewly5-WvI *Building a Business - Ep 3 - VLAN Setup in pfSense and OPNSense four our segmented network] 9/11/2022 * [https://www.pcworld.com/article/2548020/build-your-own-router-and-firewall-with-opnsen...")