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

• 14:02, 23 August 2022 Brb talk contribs uploaded File:ComplexHeatmap1.png (<pre> library(ComplexHeatmap) set.seed(123) ng <- 10; n <- 10 mat = matrix(rnorm(ng * n), n) rownames(mat) = paste0("R", 1:ng) colnames(mat) = paste0("C", 1:n) bin <- sample(c("resistant", "sensitive"), n, replace = TRUE) tgi <- runif(n) # sort the columns by tgi ord <- order(tgi) col_fun = circlize::colorRamp2(range(tgi), c("#DEEBF7", "#084594")) column_ha = HeatmapAnnotation(tgi = tgi[ord], bin = bin[ord], col = list(tgi = col_fun,...)
• 14:02, 23 August 2022 Brb talk contribs created page File:ComplexHeatmap1.png (<pre> library(ComplexHeatmap) set.seed(123) ng <- 10; n <- 10 mat = matrix(rnorm(ng * n), n) rownames(mat) = paste0("R", 1:ng) colnames(mat) = paste0("C", 1:n) bin <- sample(c("resistant", "sensitive"), n, replace = TRUE) tgi <- runif(n) # sort the columns by tgi ord <- order(tgi) col_fun = circlize::colorRamp2(range(tgi), c("#DEEBF7", "#084594")) column_ha = HeatmapAnnotation(tgi = tgi[ord], bin = bin[ord], col = list(tgi = col_fun,...)
• 13:19, 22 August 2022 Brb talk contribs uploaded File:Doubledip.png (<pre> ng <- 1000 # number of genes ns <- 100 # number of samples k <- 2 # number of groups alpha <- .001 # cutoff of selecting sig genes set.seed(1) x = matrix(rnorm(ng * ns), nr= ns) # samples x features hc = hclust(dist(x)) plot(hc) grp = cutree(hc, k=k) # vector of group membership ex <- t(x) r1 <- genefilter::rowttests(ex, factor(grp)) sum(r1$p.value < alpha) # 2 hist(r1$p.value) i <- which(r1$p.value < alpha) i1 <- i[1] ; i2 <- i[2] plot(x[, i1], x[, i2], col = grp, pch= 16, cex=1...)
• 13:19, 22 August 2022 Brb talk contribs created page File:Doubledip.png (<pre> ng <- 1000 # number of genes ns <- 100 # number of samples k <- 2 # number of groups alpha <- .001 # cutoff of selecting sig genes set.seed(1) x = matrix(rnorm(ng * ns), nr= ns) # samples x features hc = hclust(dist(x)) plot(hc) grp = cutree(hc, k=k) # vector of group membership ex <- t(x) r1 <- genefilter::rowttests(ex, factor(grp)) sum(r1$p.value < alpha) # 2 hist(r1$p.value) i <- which(r1$p.value < alpha) i1 <- i[1] ; i2 <- i[2] plot(x[, i1], x[, i2], col = grp, pch= 16, cex=1...)
• 09:21, 10 August 2022 Brb talk contribs uploaded File:Ruspini.png (library(cluster) # ruspini is 75 x 2 data(ruspini) hc <- hclust(dist(ruspini), "ave"); plot(hc) # si <- silhouette(groups, dist(ruspini)) # plot(si, main = paste("k = ", 4)) op <- par(mfrow= c(3,2), oma= c(0,0, 3, 0), mgp= c(1.6,.8,0), mar= .1+c(4,2,2,2)) plot(hc) for(k in 2:6) { groups<- cutree(hc, k=k) si <- silhouette(groups, dist(ruspini)) plot(si, main = paste("k = ", k)) } par(op))
• 09:21, 10 August 2022 Brb talk contribs created page File:Ruspini.png (library(cluster) # ruspini is 75 x 2 data(ruspini) hc <- hclust(dist(ruspini), "ave"); plot(hc) # si <- silhouette(groups, dist(ruspini)) # plot(si, main = paste("k = ", 4)) op <- par(mfrow= c(3,2), oma= c(0,0, 3, 0), mgp= c(1.6,.8,0), mar= .1+c(4,2,2,2)) plot(hc) for(k in 2:6) { groups<- cutree(hc, k=k) si <- silhouette(groups, dist(ruspini)) plot(si, main = paste("k = ", k)) } par(op))
• 18:55, 23 June 2022 Brb talk contribs uploaded File:Tidyheatmap.png
• 18:55, 23 June 2022 Brb talk contribs created page File:Tidyheatmap.png
• 14:22, 21 June 2022 Brb talk contribs uploaded File:BatchqcPCA.png
• 14:22, 21 June 2022 Brb talk contribs created page File:BatchqcPCA.png
• 14:22, 21 June 2022 Brb talk contribs uploaded File:BatchqcDE.png
• 14:22, 21 June 2022 Brb talk contribs created page File:BatchqcDE.png
• 14:21, 21 June 2022 Brb talk contribs uploaded File:BatchqcVariation.png
• 14:21, 21 June 2022 Brb talk contribs created page File:BatchqcVariation.png
• 14:20, 21 June 2022 Brb talk contribs uploaded File:BatchqcSummary.png
• 14:20, 21 June 2022 Brb talk contribs created page File:BatchqcSummary.png
• 19:43, 8 June 2022 Brb talk contribs created page Fstab (Created page with "* man fstab * https://help.ubuntu.com/community/Fstab ** Format: [Device] [Mount Point] [File System Type] [Options] [Dump] [Pass] ** <dump> Enable or disable backing up of th...")
• 17:02, 4 June 2022 Brb talk contribs uploaded File:Heatmap rdylbu.png
• 17:02, 4 June 2022 Brb talk contribs created page File:Heatmap rdylbu.png
• 14:02, 4 June 2022 Brb talk contribs created page Self hosting (Created page with "= Resource = * [https://github.com/mycroftwilde/portainer_templates Helpful Youtube Channels for Self-Hosting] = [http://www.proxmox.com/en/ Proxmox Virtual Environment] = *...")
• 09:06, 27 May 2022 Brb talk contribs uploaded File:Inter gg2.png
• 09:06, 27 May 2022 Brb talk contribs created page File:Inter gg2.png
• 08:51, 27 May 2022 Brb talk contribs uploaded File:Inter gg.png
• 08:51, 27 May 2022 Brb talk contribs created page File:Inter gg.png
• 08:51, 27 May 2022 Brb talk contribs uploaded File:Inter base.png
• 08:51, 27 May 2022 Brb talk contribs created page File:Inter base.png
• 08:16, 27 May 2022 Brb talk contribs uploaded a new version of File:Inter base.svg
• 08:04, 27 May 2022 Brb talk contribs uploaded File:Inter base.svg
• 08:04, 27 May 2022 Brb talk contribs created page File:Inter base.svg
• 09:08, 26 May 2022 Brb talk contribs uploaded File:LogisticFail.svg (> set.seed(1234); n <- 16; mu=3; x <- c(rnorm(n), rnorm(n, mu)); y <- rep(0:1, each=n) > summary(glm(y ~ x, family = binomial)); plot(x, y))
• 09:08, 26 May 2022 Brb talk contribs created page File:LogisticFail.svg (> set.seed(1234); n <- 16; mu=3; x <- c(rnorm(n), rnorm(n, mu)); y <- rep(0:1, each=n) > summary(glm(y ~ x, family = binomial)); plot(x, y))
• 12:35, 16 May 2022 Brb talk contribs created page Batch effect (Created page with "= Merging two gene expression studies, ComBat = * [https://www.coursera.org/lecture/statistical-genomics/module-2-overview-1-12-cbqYZ Statistics for Genomic Data Science] (Cou...")
• 11:56, 10 May 2022 Brb talk contribs uploaded File:ColorRampBlueRed.png
• 11:56, 10 May 2022 Brb talk contribs created page File:ColorRampBlueRed.png
• 08:34, 30 April 2022 Brb talk contribs created page Docker Applications (Created page with "[https://kuonsam.miraheze.org/wiki/Setting_Up_a_Docker_Server#Install_Docker-compose Setting Up a Docker Server] (host OS is CentOS) = Dockerizing Compiled Software = https:/...")
• 18:39, 24 March 2022 Brb talk contribs uploaded File:Rerrorbars.png (<pre> library(ggplot2) df <- ToothGrowth df$dosef <- as.factor(df$dose) library(dplyr) df.summary <- df %>% group_by(dosef) %>% summarise( sd = sd(len, na.rm = TRUE), len = mean(len) ) df.summary p1 <- ggplot(df, aes(dosef, len)) + geom_jitter(position = position_jitter(0.2, seed=1), color = "darkgray") + geom_point(aes(x=dosef, y=len), shape="+", size=8, data=df.summary) + geom_errorbar(aes(ymin = len-sd, ymax = len+sd), width=.2, data = df.summary) df.summary$dose <...)
• 18:39, 24 March 2022 Brb talk contribs created page File:Rerrorbars.png (<pre> library(ggplot2) df <- ToothGrowth df$dosef <- as.factor(df$dose) library(dplyr) df.summary <- df %>% group_by(dosef) %>% summarise( sd = sd(len, na.rm = TRUE), len = mean(len) ) df.summary p1 <- ggplot(df, aes(dosef, len)) + geom_jitter(position = position_jitter(0.2, seed=1), color = "darkgray") + geom_point(aes(x=dosef, y=len), shape="+", size=8, data=df.summary) + geom_errorbar(aes(ymin = len-sd, ymax = len+sd), width=.2, data = df.summary) df.summary$dose <...)
• 18:37, 24 March 2022 Brb talk contribs uploaded File:Rerrorbar.svg (<pre> library(ggplot2) df <- ToothGrowth df$dosef <- as.factor(df$dose) library(dplyr) df.summary <- df %>% group_by(dosef) %>% summarise( sd = sd(len, na.rm = TRUE), len = mean(len) ) df.summary p1 <- ggplot(df, aes(dosef, len)) + geom_jitter(position = position_jitter(0.2, seed=1), color = "darkgray") + geom_point(aes(x=dosef, y=len), shape="+", size=8, data=df.summary) + geom_errorbar(aes(ymin = len-sd, ymax = len+sd), width=.2, data = df.summary) df.summary$dose <...)
• 18:37, 24 March 2022 Brb talk contribs created page File:Rerrorbar.svg (<pre> library(ggplot2) df <- ToothGrowth df$dosef <- as.factor(df$dose) library(dplyr) df.summary <- df %>% group_by(dosef) %>% summarise( sd = sd(len, na.rm = TRUE), len = mean(len) ) df.summary p1 <- ggplot(df, aes(dosef, len)) + geom_jitter(position = position_jitter(0.2, seed=1), color = "darkgray") + geom_point(aes(x=dosef, y=len), shape="+", size=8, data=df.summary) + geom_errorbar(aes(ymin = len-sd, ymax = len+sd), width=.2, data = df.summary) df.summary$dose <...)
• 13:13, 18 March 2022 Brb talk contribs uploaded File:SnrVScor.png
• 13:13, 18 March 2022 Brb talk contribs created page File:SnrVScor.png
• 13:10, 18 March 2022 Brb talk contribs uploaded File:CorVSsnr.svg
• 13:10, 18 March 2022 Brb talk contribs created page File:CorVSsnr.svg
• 18:22, 14 March 2022 Brb talk contribs created page Filesystem (Created page with "= squashfs = '''squashfs''' is a heavy-compression based read-only filesystem that is capable of compressing 2 to 3 GB of data onto a 700MB. Linux liveCD are built using squas...")
• 13:15, 5 March 2022 Brb talk contribs uploaded File:AntiX21 mmedia.png
• 13:15, 5 March 2022 Brb talk contribs created page File:AntiX21 mmedia.png
• 14:12, 9 February 2022 Brb talk contribs created page Cancer (Created page with "= 癌症 Cancer = * [https://1drv.ms/u/s!Am92ICmSSQXujWZnlGy0JJjK1Gj6 生活中9種引發癌症最危險的因子] * [https://health.udn.com/health/story/6008/3053686 用手...")
• 21:31, 2 February 2022 Brb talk contribs uploaded File:WewatchJetsonnano-min.png
• 21:31, 2 February 2022 Brb talk contribs created page File:WewatchJetsonnano-min.png
• 09:17, 29 January 2022 Brb talk contribs created page Regression (Created page with "= Linear Regression = * [https://leanpub.com/regmods Regression Models for Data Science in R] by Brian Caffo * [https://avehtari.github.io/ROS-Examples/ Regression and Other S...")