R语言-- R语言数据类型（1）

一、向量

1. 创建

# 1.1.1 请利用c函数，输入5门专业课程的名称，组成向量nms。
print('----1.1.1')
nms <- c('语文','数学','英语','历史','物理')
print(nms)

# 1.1.2 请利用vector函数初始化score向量，记录问题1中5门专业课程的成绩。
print('----1.1.2')
score <- vector(mode = 'numeric',length = 5)
score <- c(85,90,95,75,80)
print(score)

# 1.1.3 请创建一向量grade，用逻辑值表示问题1中课程成绩是否达到优秀。
print('----1.1.3')
grade <- score >= 90
print(grade)

# 1.1.4 请将课程名称加入向量score中，作为每一分量的命名。
print('----1.1.4')
names(score) <- nms
print(score)

2. 索引

# 1.2.1 请返回第3门功课的名称
print('----1.2.1')
print(nms[3])


# 1.2.2 请返回第2到4门功课的成绩
print('----1.2.2')
print(score[2:4])


# 1.2.3 请返回除去第一门功课后，其他功课的名称
print('----1.2.3')
print(nms[-1])


# 1.2.4 请利用功课名称，获取score中对应的成绩
print('----1.2.4')
print(score['语文'])


# 1.2.5 请返回成绩大于80分的功课成绩
print('----1.2.5')
print(score[score>80])

3. 特征与操作

# 1.3.1 请输出成绩大于70分的功课有几门
print('----1.3.1')
print(nms[score>70])

# 1.3.2 创建空向量x,逐个添加你喜欢的三个数字
print('----1.3.2')
x <- NULL
x <- append(x,1)
x <- append(x,3)
x <- append(x,5)
print(x)

# 1.3.3 判断向量score是否为字符串向量
print('----1.3.3')
print(is.character(score))

4. 运算与其他操作

# 1.4.1 创建1到100的自然数组成的向量，奇数位加2，偶数位加4.
print('----1.4.1')
x <- 1:100
y <- x+c(2,4)
print(y)


# 1.4.2 创建形如（1,3,5,1,3,5,...,1,3,5）的向量，1,3,5重复100次
print('----1.4.2')
print(rep(c(1,3,5),times=100))

# 1.4.3 创建形如（1,...,1,3,...,3,5,...,5）的向量，1,3,5各重复100次
print('----1.4.3')
print(rep(c(1,3,5),each=100))

# 1.4.4 利用runif函数生成100各随机数，显示大于0.5的数值所在的位置
print('----1.4.4')
x <- runif(100)
print(which(x>0.5))