R语言 在给定的范围内找到n个数字以内的完全数的R程序
给定一个范围,任务是编写一个R程序来打印该范围内的所有完全数。
一个正整数等于它的适当除数之和,被称为完全数。最小的完全数是6,它是1、2、3之和。其他完全数是28,496,和8128。请注意,所有的完全平方数都以0,1,4,5,6或9结尾,但是所有的数字都以0,1,4,5,6或9结尾,因此完全数不是完全平方数。例如,11、21、51、79、76等都不是完全平方数。
算法 。
- 固定区间
- 寻找数字的因子
- 找出和
- 检查等价性
- 选择相应的
- 递增数字
- 以这种方式继续下去,直到达到区间的终点。
例子:
寻找从1开始的10个完全数和非完全数?
输出
[1] “1不是一个完美的数字”
[1] “2不是一个完美的数字”
[1] “3不是一个完美的数字”
[1] “4不是一个完美的数字”
[1] “5不是一个完美的数字”
[1] “6是一个完美的数字”
[1] “7不是一个完美的数字”
[1] “8不是一个完美的数字”
[1] “9不是一个完美的数字”
[1] “10不是一个完美的数字”
例1 :
输出
例2 :
输出