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

本文共 310 字,大约阅读时间需要 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/

你可能感兴趣的文章
Netty相关
查看>>
Network Dissection:Quantifying Interpretability of Deep Visual Representations(深层视觉表征的量化解释)
查看>>
Network Sniffer and Connection Analyzer
查看>>
Networkx读取军械调查-ITN综合传输网络?/读取GML文件
查看>>
Net与Flex入门
查看>>
net包之IPConn
查看>>
NFinal学习笔记 02—NFinalBuild
查看>>
NFS共享文件系统搭建
查看>>
nfs复习
查看>>
NFS网络文件系统
查看>>
ng 指令的自定义、使用
查看>>
nginx + etcd 动态负载均衡实践(二)—— 组件安装
查看>>
nginx + etcd 动态负载均衡实践(四)—— 基于confd实现
查看>>
Nginx + uWSGI + Flask + Vhost
查看>>
Nginx - Header详解
查看>>
Nginx Location配置总结
查看>>
Nginx upstream性能优化
查看>>
Nginx 中解决跨域问题
查看>>
Nginx 动静分离与负载均衡的实现
查看>>
Nginx 反向代理 MinIO 及 ruoyi-vue-pro 配置 MinIO 详解
查看>>