学习小组Day5笔记-姜洪利

一、常用包的安装以及工作环境初始配置

此处代码都是引自果子老师的《学习R语言,从这一课开始》,还是留存备用为好。

if(length(getOption("CRAN"))==0) options(CRAN="https://mirrors.tuna.tsinghua.edu.cn/CRAN/")
if(!require("tidyr")) install.packages("tidyr",update = F,ask = F)
if(!require("dplyr")) install.packages("dplyr",update = F,ask = F)
if(!require("ggplot2")) install.packages("ggplot2",update = F,ask = F)
if(!require("data.table")) install.packages("data.table",update = F,ask = F)
if(!require("ggrepel")) install.packages("ggrepel",update = F,ask = F)
if(!require("devtools")) install.packages("devtools",update = F,ask = F)
if(!require("pheatmap")) install.packages("pheatmap",update = F,ask = F)
if(!require("ggfortify")) install.packages("ggfortify",update = F,ask = F)
if(!require("stringr")) install.packages("stringr",update = F,ask = F)
if(!require("survival")) install.packages("survival",update = F,ask = F)
if(!require("survminer")) install.packages("survminer",update = F,ask = F)
if(!require("glmnet")) install.packages("glmnet",update = F,ask = F)
if(!require("ggpubr")) install.packages("ggpubr",update = F,ask = F)
if(!require("tibble")) install.packages("tibble",update = F,ask = F)
if(!require("cowplot")) install.packages("cowplot",update = F,ask = F)
if(!require("timeROC")) install.packages("timeROC",update = F,ask = F)
if(!require("survivalROC")) install.packages("survivalROC",update = F,ask = F)
if(!require("randomForest")) install.packages("randomForest",update = F,ask = F)
if(!require("Hmisc")) install.packages("Hmisc",update = F,ask = F)
if(!require("jsonlite")) install.packages("jsonlite",update = F,ask = F)
if(!require("ggstatsplot")) install.packages("ggstatsplot",update = F,ask = F)
if(!require("BiocManager")) install.packages("BiocManager",update = F,ask = F)
if(length(getOption("BioC_mirror"))==0) options>     (BioC_mirror="https://mirrors.ustc.edu.cn/bioc/")
if(!require("limma")) BiocManager::install("limma",update = F,ask = F)
if(!require("Biobase")) BiocManager::install("Biobase",update = F,ask = F)
if(!require("caret")) install.packages("caret",update = F,ask = F)
if(!require("IRanges")) BiocManager::install("IRanges",update = F,ask = F)
if(!require("DO.db")) BiocManager::install("DO.db",update = F,ask = F)
if(!require("GO.db")) BiocManager::install("GO.db",update = F,ask = F)
if(!require("fgsea")) BiocManager::install("fgsea",update = F,ask = F)
if(!require("clusterProfiler")) BiocManager::install("clusterProfiler",update = F,ask = F)
if(!require("GEOquery")) BiocManager::install("GEOquery",update = F,ask = F)
if(!require("hugene10sttranscriptcluster.db")) BiocManager::install("hugene10sttranscriptcluster.db",update = F,ask = F)
if(!require("DOSE")) BiocManager::install("DOSE",update = F,ask = F)
if(!require("RTCGA.clinical")) BiocManager::install("RTCGA.clinical",update = F,ask = F)
if(!require("bladderbatch")) BiocManager::install("bladderbatch",update = F,ask = F)
if(!require("sva")) BiocManager::install("sva",update = F,ask = F)
if(!require("DESeq2")) BiocManager::install("DESeq2",update = F,ask = F)
if(!require("edgeR")) BiocManager::install("edgeR",update = F,ask = F)

以上包安装完毕之后,先查看工作路径,后根据需要设置自己的工作路径,如下命令:
getwd() setwd() ##get/set workdictionary

二、向量与数据框

R中的数据类型有五种,分别是向量(Vector),矩阵(Matrix),数组(Array),数据框(Data Frame),列表(List);而元素的类型,有数值型、字符型、逻辑型、因子型等。向量是一维的单一类型的元素集合,矩阵是二维的单一类型的元素集合,数组是多维的单一类型的元素集合,数据框是一个二维或多维的元素集合,相当于excel表格,列表是一个虚拟的大容器,什么都可以装。

  1. 向量

向量的提取方法,是在向量后加中括号,其用法引自老师小洁的教程:

x -< rep(1:100, 2)
x[4]
x[-4]
x[2:4]
x[-2:4]
x[c(1, 5)]
x[x == 10]
x[x < 0]
x[x %% 2 ==0]
x[x %in% c(1, 2, 5)]
  1. 数据框
  • 读文件和写文件
    常用的命令是read.csv,read.table,read.xlsx,write.csv,write.table,write.xlsx

  • 提取元素,相比向量,除了[],多了$,$相当于数据框中的一个向量的名称,也就是其中的某一列,在数据框里,列是变量,行是观测对象。

以下引自老师小洁的文章

x[4,]
x[,4]/x[4]
x[4,4]
x[1:4]
x[1:4, 1:4]
x[c(1, 4)]
x[c(1, 4), c(1, 4)]
x$name
  1. attach&with的用法
  • attach和detach要配对使用,否则后续可能遇到未知错误。
  • attach相当于把一个数据暂时赋值为全局环境,如果不用detach的命令,attach将持续有用,而with仅仅是在括号里的代码对数据进行一个短暂的全局赋值,出了with代码,自动失效,而代码里如果存在赋值的变量,变量不予保留,要保留,需使用<<-
最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 206,723评论 6 481
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 88,485评论 2 382
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 152,998评论 0 344
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 55,323评论 1 279
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 64,355评论 5 374
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 49,079评论 1 285
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 38,389评论 3 400
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 37,019评论 0 259
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 43,519评论 1 300
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 35,971评论 2 325
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 38,100评论 1 333
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 33,738评论 4 324
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 39,293评论 3 307
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 30,289评论 0 19
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 31,517评论 1 262
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 45,547评论 2 354
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 42,834评论 2 345