博客
关于我
R语言:作业四(编写函数)
阅读量:349 次
发布时间:2019-03-04

本文共 301 字,大约阅读时间需要 1 分钟。

在这里插入图片描述

本次作业题没什么亮点,所以没有什么拓展。

> fun <- function(n){   + 	repeat{   + 		if(n <= 0){   + 			print("要求输入一个正整数")+ 			break+ 		}else if(n %% 2 == 0){   + 			n <- n / 2+ 		}else if(n == 1){   + 			print("运算成功")	+ 			break+ 		}else{   + 			n <- 3 * n + 1+ 		}	+ 	}+ 	print(paste("n =",n))+ }

随意测试:

> fun(520)

[1] 运算成功

转载地址:http://wyse.baihongyu.com/

你可能感兴趣的文章
mysql备份
查看>>
mysql备份与恢复
查看>>
mysql备份工具xtrabackup
查看>>
mysql备份恢复出错_尝试备份/恢复mysql数据库时出错
查看>>
mysql复制内容到一张新表
查看>>
mysql复制表结构和数据
查看>>
mysql复杂查询,优质题目
查看>>
MySQL外键约束
查看>>
MySQL多表关联on和where速度对比实测谁更快
查看>>
MySQL多表左右连接查询
查看>>
mysql大批量删除(修改)The total number of locks exceeds the lock table size 错误的解决办法
查看>>
mysql如何做到存在就更新不存就插入_MySQL 索引及优化实战(二)
查看>>
mysql如何删除数据表,被关联的数据表如何删除呢
查看>>
MySQL如何实现ACID ?
查看>>
mysql如何记录数据库响应时间
查看>>
MySQL子查询
查看>>
Mysql字段、索引操作
查看>>
mysql字段的细节(查询自定义的字段[意义-行列转置];UNION ALL;case-when)
查看>>
mysql字段类型不一致导致的索引失效
查看>>
mysql字段类型介绍
查看>>