R语言期末考试试题及详细参考答案

R语言期末考试试题及详细参考答案考试说明：本试卷满分100分，考试时间90分钟，闭卷考试；主要考查R语言基础语法、数据结构、数据处理、绘图及简单统计分析实操，所有代码均可在R原生环境直接运行，无需加载第三方拓展包。一、单项选择题（共10题，每题3分，共30分）每题只有一个正确答案，请选择最符合题意的选项。1.在R语言中，以下哪个符号用于赋值操作？（）A.=B.==C.<-D.::2.R语言中，以下哪种数据结构可以存储不同类型的数据（数值、字符、逻辑值）？（）A.向量B.矩阵C.列表D.数组3.已知向量x<-c(12,5,8,22,9)，执行sort(x)后的结果是？（）A.5,8,9,12,22B.22,12,9,8,5C.12,22,5,8,9D.报错4.提取数据框df中名为“score”的列，错误的写法是？（）A.df$scoreB.df[,“score”]C.df[score]D.df[[“score”]]5.以下函数中，用于计算向量平均值的是？（）A.sum()B.mean()C.max()D.avg()6.在R中，逻辑值TRUE和FALSE对应的数值分别是？（）A.1,0B.0,1C.T,FD.无对应数值7.已知x<-c(1:6)，执行x[x>3]的运行结果是？（）A.1,2,3B.4,5,6C.3,4,5,6D.报错8.以下哪个函数可以实现读取本地csv格式数据文件？（）A.read.table()B.read.csv()C.write.csv()D.load()9.R语言中，生成10个1-5之间随机整数的函数组合正确的是？（）A.sample(1:5,10,replace=T)B.rnorm(10,1,5)C.runif(10,1,5)D.rep(1:5,10)10.数据框中，用于删除缺失值NA的函数是？（）A.is.na()B.na.omit()C.rm()D.clear()二、判断题（共10题，每题2分，共20分）正确选√，错误选×1.R语言中向量的元素必须是同一数据类型。（）2.3==3.0的运行结果为FALSE。（）3.data.frame是R语言最常用的数据分析数据结构。（）4.rep(1:3,2)的运行结果是1,2,3,1,2,3。（）5.可以用length()函数获取矩阵的行数。（）6.R语言代码区分大小写。（）7.c(1,2,“3”)生成的向量为字符型向量。（）8.plot()函数只能绘制折线图，不能绘制散点图。（）9.unique()函数可以去除向量中的重复元素。（）10.ls()函数可以删除工作区的所有变量。（）三、基础编程题（共2题，每题10分，共20分）1.编写R代码，完成以下操作：（1）创建数值向量a，包含元素：85、92、78、90、88、76、95；（3分）（2）计算该向量的最大值、最小值、平均值、总和；（4分）（3）筛选出向量中大于85的所有元素。（3分）2.编写R代码，构建一个学生成绩数据框，完成以下要求：（1）数据框包含3列：姓名、语文成绩、数学成绩，共4名学生；（6分）（2）为数据框新增一列“总成绩”，总成绩=语文成绩+数学成绩。（4分）四、数据处理应用题（共1题，15分）现有一组员工薪资数据，需通过R代码完成数据清洗与统计分析，需求如下：1.手动构建数据框salary，包含字段：部门（department）、薪资（wage）、工龄（year），数据如下：部门：技术部、销售部、行政部、技术部、销售部、行政部、技术部薪资：8500、7200、5800、9200、7500、6000、NA工龄：3、2、4、5、3、2、42.清除数据中的缺失值；（5分）3.分别统计技术部、销售部、行政部的平均薪资；（5分）4.筛选出工龄≥3年的所有员工数据。（5分）五、基础绘图题（共1题，15分）基于第四题处理后的员工薪资数据，编写R代码完成绘图：1.绘制各部门员工薪资的柱状图，展示不同部门的薪资分布；（8分）2.为图表添加标题、横轴标签、纵轴标签，简化图表样式，保证图表清晰可读。（7分）详细参考答案及解析一、单项选择题答案及解析1.C解析：R语言标准赋值符号为<-，=多用于参数赋值，==是等于比较符号，::用于调用包内函数。2.C解析：向量、矩阵、数组仅支持单一数据类型，列表可混合存储数值、字符、逻辑值、数据框等各类数据。3.A解析：sort()函数默认对向量进行升序排序，原向量排序后结果为5,8,9,12,22。4.C解析：df[score]写法错误，score为列名字符串，必须加双引号，其余三种写法均可正确提取列数据。5.B解析：mean()为R内置求平均值函数，sum()求和，max()求最大值，无avg()内置函数。6.A解析：R中逻辑值参与数值运算时，TRUE等价于1，FALSE等价于0。7.B解析：x>3为逻辑筛选条件，会保留向量中大于3的元素，即4、5、6。8.B解析：read.csv()专门用于读取csv文件，read.table()读取txt表格文件，write.csv()为导出数据函数，load()读取R格式数据文件。9.A解析：sample()可生成指定范围随机整数，replace=T代表有放回抽样；rnorm为正态分布随机数，runif为均匀分布小数随机数，rep为重复生成数据。10.B解析：na.omit()删除数据缺失值，is.na()判断是否为缺失值，rm()删除变量，clear()非R内置函数。二、判断题答案及解析1.√解析：R向量为同质数据结构，所有元素必须为同一数据类型。2.×解析：数值3和3.0数值相等，比较结果为TRUE。3.√解析：数据框结构灵活、适配表格数据，是数据分析核心数据结构。4.√解析：rep(向量,n)表示将整体向量重复n次，运行结果正确。5.×解析：nrow()获取矩阵行数，ncol()获取列数，length()获取矩阵总元素个数。6.√解析：R语言严格区分大小写，plot()和Plot()是完全不同的命令。7.√解析：向量中包含字符元素时，所有元素会自动统一转换为字符型。8.×解析：plot()是万能绘图函数，可根据数据类型绘制散点图、折线图、曲线图等多种图表。9.√解析：unique()内置函数专门用于去除向量、数据框中的重复值。10.×解析：ls()查看工作区所有变量，rm(list=ls())才可清空所有变量。三、基础编程题参考答案1.参考答案（满分10分）PlainText

#（1）创建数值向量

a<-c(85,92,78,90,88,76,95)

#（2）计算统计指标

max(a)#最大值

min(a)#最小值

mean(a)#平均值

sum(a)#总和

#（3）筛选大于85的元素

a[a>85]运行结果：最大值95、最小值76、平均值86.28571、总和604；筛选结果：92、90、88、952.参考答案（满分10分）PlainText

#（1）构建学生成绩数据框

df<-data.frame(

姓名=c("张三","李四","王五","赵六"),

语文成绩=c(88,92,79,85),

数学成绩=c(90,86,93,80)

)

#（2）新增总成绩列

df$总成绩<-df$语文成绩+df$数学成绩四、数据处理应用题参考答案（满分15分）PlainText

#1.构建数据框

salary<-data.frame(

department=c("技术部","销售部","行政部","技术部","销售部","行政部","技术部"),

wage=c(8500,7200,5800,9200,7500,6000,NA),

year=c(3,2,4,5,3,2,4)

)

#2.清除缺失值

salary_clean<-na.omit(salary)

#3.分部门统计平均薪资

tapply(salary_clean$wage,salary_clean$department,mean)

#4.筛选工龄≥3年的员工数据

salary_clean[salary_clean$year>=3,]核心结果说明：清洗后删除1条含缺失值的技术部数据；平均薪资：技术部8850元、销售部7350元、行政部5900元；筛选后保留5条工龄≥3年的员工数据。五、基础绘图题参考答案（满分15分）PlainText

#基于清洗后的薪资数据绘制柱状图

#统计各部门平均薪资，用于绘图

avg_wage<-tapply(salary_clean$wage,salary_clean$department,mean)

#绘制柱状图

barplot(avg_wage,

main="各部门员工平均薪资对比",#图表标题

xlab="部门",#横轴标签

ylab="平均薪资（元）",#纵轴标签

col="lightblue",#填充颜色

border=