OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A048385号 在以10为基数的符号中,用n的平方值替换n的数字(版本1)。 19
0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 10, 11, 14, 19, 116, 125, 136, 149, 164, 181, 40, 41, 44, 49, 416, 425, 436, 449, 464, 481, 90, 91, 94, 99, 916, 925, 936, 949, 964, 981, 160, 161, 164, 169, 1616, 1625, 1636, 1649, 1664, 1681, 250, 251, 254, 259, 2516, 2525 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,3
链接
阿洛伊斯·海因茨,n=0..10000时的n,a(n)表
配方奶粉
a(n)>=n,当n属于A007088号-雷米·西格里斯特2019年5月17日
MAPLE公司
a: =n->(s->解析(cat(seq(解析(s[i])^2,i=1..长度))(“”||n):
seq(a(n),n=0..70)#阿洛伊斯·海因茨2014年7月4日
数学
表[FromDigits[Flatten[Integer Digits/@(Integer数字[n]^2)]],{n,0,80}](*哈维·P·戴尔2019年5月6日*)
黄体脂酮素
(Magma)[0]cat[StringToInteger(&cat[InterToString(h):h in Reverse([i^2:i in Intseq(n)])]):n in[1.55]]//布鲁诺·贝塞利2012年7月31日
(Python)
定义数字(n):
d=[]
当n>0时:
d.append(n%10)
n=无/无10
返回d
定义sqdig(n):
新=0
num=数字(n)
间距=0
当num时:
k=num.pop(0)
新+=(10**(间距))*(k**2)
如果k>3:
间距+=1
间距+=1
返回新的
#大卫·纳辛2012年8月19日
(哈斯克尔)
a048385 0=0
a048385 n=读取(显示(a048385n’)++显示(m^2))::整数
其中(n',m)=divMod n 10
(PARI)a(n)=如果(n,从数字(concat(apply(d->my(d2=d^2)));如果(d2,数字(d2),[0]),数字(n))),0)\\雷米·西格里斯特2019年5月17日
(MATLAB)m=1;
对于u=0:20,数字=dec2base(u,10)-“0”;digitp=数字^2;
sol(m)=str2num(strrep(num2str(数字),“”,“”);m=m+1;
结束
溶胶%马吕斯·A·伯蒂2019年5月17日
交叉参考
请参见A068522号用于其他版本。
关键词
非n,基础
作者
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|转换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月12日03:13。包含373321个序列。(在oeis4上运行。)