摘要: R语言中while循环 1、测试1 a <- c(3,8,2,7,4,9) i = 1 while (i <= length(a)) { print(a[i]) i = i + 1 } 2、测试2 f <- NA f[1] <- f[2] <- 1 i <- 3 while (i <= 10) { 阅读全文
posted @ 2021-04-24 23:23 小鲨鱼2018 阅读(546) 评论(0) 推荐(0) 编辑
摘要: 1、for循环 sum = 0 for (i in 1:100) { sum = sum + i } print(sum) 1-100内偶数的和 sum = 0 for (i in 1:100) { if (i %% 2 == 0) { sum = sum + i } } print(sum) 扩展 阅读全文
posted @ 2021-04-24 22:51 小鲨鱼2018 阅读(9605) 评论(0) 推荐(0) 编辑
摘要: 1、测试1 num = 8 if (num %% 2 == 0) { print("even!") } 2、测试2 num = 7 if (num %% 2 == 0) { print("even!") } 3、测试3 num = 7 if (num %% 2 == 0) { print("even 阅读全文
posted @ 2021-04-24 22:18 小鲨鱼2018 阅读(4106) 评论(0) 推荐(0) 编辑
摘要: R语言中利用supply函数提取列表中元素。 1、测试1 a <- c("3_k","4_f","2_t","8_s") a b <- strsplit(a, "_") b class(b) c <- sapply(b, "[",1) c d <- sapply(b, "[",2) d 阅读全文
posted @ 2021-04-24 20:23 小鲨鱼2018 阅读(811) 评论(0) 推荐(0) 编辑
摘要: R语言中scale函数。 scale(x, center = TRUE, scale = TRUE), 为数据对象x按列进行中心化(center = TRUE)或标准化(center=TRUE, scale = TRUE)。 scale函数是将一组数进行处理,默认情况下是将一组数的每个数都减去这组数 阅读全文
posted @ 2021-04-24 17:38 小鲨鱼2018 阅读(2085) 评论(0) 推荐(0) 编辑
摘要: R语言中共apply函数。 R语言中提供了一个apply()函数,可将一个任意函数“应用”到矩阵、数组、数据框的任何维度上。 在矩阵或数据框中,MARGIN=1表示行,MARGIN=2表示列。 1、测试1 a <- matrix(sample(1:10,9),nrow = 3, ncol = 3,b 阅读全文
posted @ 2021-04-24 15:46 小鲨鱼2018 阅读(1175) 评论(0) 推荐(0) 编辑
摘要: 1、全部转换为大写 x <- "sfMFdf" x toupper(x) 2、全部转换为小写 x <- "sfMFdf" x tolower(x) 3、首字母大写 x <- "sfMFdf" x library(Hmisc) capitalize(x) ## 只是将首字母修改为大写 library( 阅读全文
posted @ 2021-04-24 12:50 小鲨鱼2018 阅读(4913) 评论(0) 推荐(0) 编辑
摘要: R语言中substr函数,字符串截取函数 1、测试1 x <- "dfserut" x substr(x,1,3) substr(x,2,5) substr(x,2) substring(x,2) 2、测试2 x <- c("sfwsfs","ydsfs","gdsge","mhxsf") x su 阅读全文
posted @ 2021-04-24 12:05 小鲨鱼2018 阅读(5719) 评论(0) 推荐(0) 编辑
摘要: R语言中sub函数和gsub函数 1、 x <- "dwsdffsd" sub("d","M",x) gsub("d","M",x) sub替换第一个匹配的字符,gsub匹配所有的 2、 x <- 1:15 x sub(1,"M",x) gsub(1,"M",x) 处理向量是以每个元素为单位的。 阅读全文
posted @ 2021-04-24 11:54 小鲨鱼2018 阅读(1500) 评论(0) 推荐(0) 编辑