R语言程序逻辑验证判断

1.数据类型是否符合

class() 函数获取类型，返回字符串

data=iris
str(iris[2])
data=iris[1:4]
data1=as.vector(data)
str(data1)
data[1,][,2]
class(data[1,][,1]) == 'numeric'  #判断数据是否为数值型

2.查看数据长度

i=length(data[1,])  #判断数据维度

3.查看数据是否为空

判断一个object （x）是不是属于这些类型有相应的函数：

is.null(x)
is.na(x)
is.nan(x)
is.infinite(x)[/size]

4.对数据进行取整数

n=8
aa=floor((2/7)*n) ##取整数
aa

5.对数据进行字段拆分

字段分割函数： str_split_fixed (x, split, n)

x：需要处理的字段/字符

split：用于分割的字符串

n：分隔为多少列

返回值： data.frame

注：str_split_fixed 函数使用前，先使用 install.packages (stringr) 安装，再使用 library (stringr) 引用该包

6.生成新数据：for循环，不使用replicate

newdata <- data.frame()
for (i in 1:5) {
  for (j in 1:10) {
    newdata[j, i] <- myfun(a[i], b[i])
    }
}

print( newdata)

7.条件判断

if(con, statement1, statement2)

x<-3
y<-ifelse(x>0, 2*x+1, 2*x-1)

con是逻辑条件，当逻辑条件的值为TRUE时，则输出statement1的值，否则输出statement2的值。是否有空值进行判断

x<-c(1,NA,NA,12,34)
y<-ifelse(is.na(x),0,x)