R语言实验三

1、读取一个文件并进行如下操作。

①使用命令清空工作空间,使用read.table读取exam_1.txt文件,将文件保存到data变量中,数据第一行设置为列名,第一列是行名。

②判断对象data是否为矩阵。

③将对象转换为矩阵,记为data1。

④通过for循环(不要使用apply家族的命令),分别计算每一行数据的最大值,最小值和均值,将其分别保存到变量max_data、min_data和mean_data变量中,将三列数据添加到data1矩阵的最后三列中,三列的名字分别是“max_value”,”min_value”,”mean_value”。

⑤将data1矩阵通过write.table输出到result.txt中,包含行列名,数据没有引号,分隔设置为tab。

这是我输出的result文件

2、创建一个逢3必过的游戏。

①使用命令清空工作空间,新建一个变量a,为1到100。

②通过for循环进行将数字进行打印(3的倍数或者数字包含3跳过不输出)打印内容示例为

1不跳过

2不跳过

4不跳过

③将所有跳过的数字保存到变量b中,将变量b转换为行为1的矩阵,使用write.table保存到result_2.txt中。

3、判断质数。

①使用命令清空工作空间,新建一个变量a,为1到100。

②外层循环使用while循环变量a,判断a中的数字是否为质数(使用if),如果是质数则在屏幕打印

3为质数

5为质数

③将质数保存到变量b中。

④将变量b转换为行为1的矩阵,使用write.table保存到result_3.txt中。

4、通过for循环和list.files命令,将data_exam_3文件夹下所有以.txt结尾的文件批量读取,并将其保存到列表list_data中,给列表的每一部分重命名,“l1”,”l2”等形式。

作业提交形式: 

将代码和运行结果截图保存到word中。

  • 7
    点赞
  • 7
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

智能边缘探索记

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值