R语言：作业四（编写函数）
本文共 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/
你可能感兴趣的文章
Nginx实战经验分享：从小白到专家的成长历程！
查看>>
Nginx实现反向代理负载均衡
查看>>
nginx实现负载均衡
查看>>
nginx常用命令及简单配置
查看>>
nginx开机启动脚本
查看>>
nginx异常：the “ssl“ parameter requires ngx_http_ssl_module in /usr/local/nginx/conf
查看>>
nginx总结及使用Docker创建nginx教程
查看>>
nginx报错：the “ssl“ parameter requires ngx_http_ssl_module in /usr/local/nginx/conf/nginx.conf:128
查看>>
nginx报错：the “ssl“ parameter requires ngx_http_ssl_module in usrlocalnginxconfnginx.conf128
查看>>
nginx日志分割并定期删除
查看>>
Nginx日志分析系统---ElasticStack(ELK)工作笔记001
查看>>
Nginx映射本地json文件，配置解决浏览器跨域问题，提供前端get请求模拟数据
查看>>
nginx最最最详细教程来了
查看>>
Nginx服务器---正向代理
查看>>
Nginx服务器上安装SSL证书
查看>>
Nginx服务器基本配置
查看>>
Nginx服务器的安装
查看>>
Nginx标准配置文件（包括反向代理、大文件上传、Https证书配置、文件预览等）
查看>>
Nginx模块 ngx_http_limit_conn_module 限制连接数
查看>>
Nginx模块 ngx_http_limit_req_module 限制请求速率
查看>>