随笔分类 - R语言
摘要：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) 扩展
阅读全文
摘要：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
阅读全文
摘要：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
阅读全文
摘要：R语言中scale函数。 scale(x, center = TRUE, scale = TRUE), 为数据对象x按列进行中心化（center = TRUE）或标准化（center=TRUE, scale = TRUE）。 scale函数是将一组数进行处理，默认情况下是将一组数的每个数都减去这组数
阅读全文
摘要：R语言中共apply函数。 R语言中提供了一个apply()函数，可将一个任意函数“应用”到矩阵、数组、数据框的任何维度上。 在矩阵或数据框中，MARGIN=1表示行，MARGIN=2表示列。 1、测试1 a <- matrix(sample(1:10,9),nrow = 3, ncol = 3,b
阅读全文
摘要：1、全部转换为大写 x <- "sfMFdf" x toupper(x) 2、全部转换为小写 x <- "sfMFdf" x tolower(x) 3、首字母大写 x <- "sfMFdf" x library(Hmisc) capitalize(x) ## 只是将首字母修改为大写 library(
阅读全文
摘要：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
阅读全文
摘要：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) 处理向量是以每个元素为单位的。
阅读全文
摘要：R语言中求分位数 1、测试1 test <- 1:10 test a <- quantile(test,c(0.25,0.75)) a
阅读全文
摘要：R语言中求值域 1、测试1 test <- c(34,3,9,24,43,87,2) test range(test) ## 求值域 diff(range(test)) ## 求最大值和最小值之差
阅读全文
摘要：R语言中diff函数，表示滞后差分 1、测试1 test <- sample(1:10,5) test a <- diff(test) ## diff表示后一个数减去前一个数 a 2、测试2 test <- sample(1:10,5) test a <- diff(test) a b <- dif
阅读全文
摘要：R语言中subset函数同时依据行列进行数据筛选 1、测试数据 manager <- 1:5 date <- c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09") country <- c("US","US","UK","UK","UK") g
阅读全文
摘要：R语言中根据日期筛选数据 1、测试数据 manager <- 1:5 date <- c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09") country <- c("US","US","UK","UK","UK") gender <- c("
阅读全文
摘要：1、测试1 a <- c(3,7,4,1) order(a) ## 返回从小到大排序的索引 rank(a) ## 返回元素从小到大的排名 sort(a) ## 直接对元素从小到大排序
阅读全文
摘要：1、判断数据类型 a <- 1:4 class(a) is.numeric(a) is.vector(a) is.character(a) is.logical(a) is.array(a) is.data.frame(a) is.matrix(a) is.factor(a) 2、转换数据类型 a
阅读全文
摘要：1、字符串转换为日期 x <- c("3/5/2004","5/2/2008") y <- as.Date(x,"%m/%d/%Y") y class(y) 2、获取当前日期 Sys.Date() date() 3、日期计算差值 a <- as.Date("2021-03-30") b <- as.
阅读全文
摘要：1、查看缺失值 > x <- c(3,1,NA,NA) > x <- c(3,1,NA,NA) > y <- c(3,4,2,7) > z <- c(3,2,5,1) > da <- data.frame(x,y,z) > da x y z 1 3 3 3 2 1 4 2 3 NA 2 5 4 NA
阅读全文
摘要：R语言中rnorm函数。（正态分布） 1、基本用法 norm(n, x, y): 产生n个平均数为x，标准差为y的数。 默认情况下，平均数为0， 标准差为1. > a <- rnorm(10) > a [1] 0.08629733 -0.31750665 1.51152649 -0.60992255
阅读全文
摘要：1、 dat <- data.frame(v1=sample(1:15,15),v2=sample(1:15,15)) dat$cat[dat$v1 <= 8] <- "SMALL" dat$cat[dat$v1 > 8 ] <- "BIG" 2、 dat <- data.frame(v1=samp
阅读全文
摘要：R语言中求数据框每一列的最大值、最小值、平均数、中位数、方差和标准差 1、 d <- data.frame(v1=sample(1:10,6),v2=sample(1:10,6),v3=sample(1:10,6), v4=sample(1:10,6)) rmax <- vector() rmin
阅读全文
浙公网安备 33010602011771号