library(microeco) # use pipe operator in magrittr package library(magrittr) # set.seed is used to fix the random number generation to make the results repeatable set.seed(2021…

#激活环境 conda activate qiime2-2019.7 #按拷贝数标准化OTU表，处理自己数据成picrust1所需 ##安装好qiime2，然后导入成qiime2格式，方便后面使用 #feature-table.biom文件 #qiime tools import --input-path ../97_otus.fasta --ou…

Langfelder P, Horvath S. WGCNA: an R package for weighted correlation network analysis. BMC Bioinformatics, 2008, 9(559):1-13. #WGCNA 包通过 bioconductor 安装 #install.packages('Bi…

#读取文件 p1<-read.table("1.txt",sep="\t",header = T,row.names = 1) p2<-t(p1) #install.packages("pheatmap") library(pheatmap) p3<-pheatmap(p2) library(ggplot2) #ggsave("p…

#BiocManager::install('clusterProfiler') #BiocManager::install("pathview") #install.packages('tidyverse') library(clusterProfiler) library(tidyverse) data1<-read.table("K2.…

library(ggplot2) colors <-c("#E41A1C","#000000","#FF8C00","#4DAF4A","#984EA3", "#40E0D0") Ap3.2<-read.csv("Ap3.2.csv") #Ap3.1$SWA<-factor(Ap3.1$SWA,levels = c("PUT","…

#我的网盘/博客素材/批量爬取NCBI # 安装R包 #install.packages('RSelenium') cd C:\Users\53446\Desktop\try2 java -Dwebdriver.chrome.driver="geckodriver.exe" -jar selenium-server-standalone-4.0.0…