小鲨鱼2018

摘要： 1、 > dat1 <- c(1, 2, 3, 4, 5, 6) ## 测试数据 > dat2 <- c(1, 2, 3, 4, 5, 6) ## 测试数据 > lm(dat2~dat1) Call: lm(formula = dat2 ~ dat1) Coefficients: (Intercep 阅读全文

摘要： R语言caret包中createFolds函数实现将向量随机分组。 1、 > library(caret) > createFolds(1:10, k = 5) ## 将1-10随机分为5组，返回每组的索引 $Fold1 [1] 4 5 $Fold2 [1] 1 3 $Fold3 [1] 2 7 $ 阅读全文

摘要： R语言中set.seed函数的作用是保证两次随机抽样的结果一致。 1、不使用set.seed函数的情况下 > sample(1:8, 3) ## 从1~8中随机抽取3个数字 [1] 3 7 4 > sample(1:8, 3) [1] 4 8 6 > sample(1:8, 3) [1] 1 5 4 阅读全文

摘要： 1、全部替换 > c1 <- c("x", "z", "a", "b") > c2 <- c("a", "ab", "d", "z") > c3 <- c("d", "m", "n", "a") > c4 <- c("x", "a", "m", &qu 阅读全文

摘要： 1、 > dat1 <- 1:8 > dat2 <- 3:10 > setdiff(dat1, dat2) ## 取数据dat1中的唯一项 [1] 1 2 > setdiff(dat2, dat1) ## 取数据dat2中的唯一项 [1] 9 10 2、如果有重复 > dat1 <- c(2, 1, 阅读全文

摘要： 1、测试数值 > dat1 <- 1:8 > dat2 <- 3:10 > intersect(dat1, dat2) ## 直接取两个数值型的交集 [1] 3 4 5 6 7 8 2、数值有重复的情况 > dat1 <- c(2, 3, 2, 4, 5, 3, 6, 3, 4, 8) > dat2 阅读全文

摘要： R原因中list.files()函数用于列出指定目录下的特定文件。 1、查看当前目录下的所有文件 > dir() [1] "outcome.map" "ped.r" "result.map" "test1.r" "test2.r" "testxx.abcr" > list.files() [1] " 阅读全文

摘要： 直方图： 直观地反映数据在不同区间的频数/频率分布。 1、 > dat <- c(rep(1,10), rep(2,5), rep(3,6)) ## 测试数据 > dat [1] 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 3 > hist(dat) ## 直接绘 阅读全文

摘要： 1、一般绘图 > plot(0:10) 2、利用mfrow参数设置 par(mfrow = c(1,2)) ## 设置为一行两列 plot(0:10) plot(0:10) > dev.off() ## 清空设置 null device 1 > par(mfrow = c(1,4)) ## 设置为1 阅读全文

摘要： 1、查看默认值 > getOption("digits") [1] 7 ## 默认显示是7位 2、测试 > a = 1.12345 > a ## a为6位，正常显示 [1] 1.12345 > a = 1.123456 > a ## a为7位， 正常显示 [1] 1.123456 > a = 1.1 阅读全文