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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A064438美元 可被四位数之和整除的数字。 22
1, 2, 3, 4, 6, 8, 9, 12, 16, 18, 20, 21, 24, 28, 30, 32, 33, 35, 36, 40, 42, 48, 50, 52, 54, 60, 63, 64, 66, 68, 69, 72, 76, 78, 80, 81, 84, 88, 90, 91, 96, 100, 102, 108, 112, 114, 120, 126, 128, 129, 132, 136, 138, 140, 144, 148, 150, 154, 156, 160, 162, 168, 171, 180 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
一个好的“谜题”序列——猜出前20个左右的术语的规则。
链接
保罗·戴伦伯格和汤姆·埃德加,连续阶乘基Niven数,斐波那契四分位数。(2018)第56卷第2期,第163-166页。
示例
28的第四纪代表为130,1+3+0=4除以28。
数学
选择[Range[200],Divisible[#,Total[Integer Digits[#,4]]&](*哈维·P·戴尔2011年6月9日*)
黄体脂酮素
(ARIBAS):最大参数:=190;对于n:=1到maxarg do,如果n模和(四元数组(n))=0,则写入(n,“”);结束;结束;函数quaternarray(n:整数):数组;var k:整数;stk:堆栈;当n>0时开始k:=n mod 4;堆栈推送(stk,k);n:=(n-k)div 4;结束;返回堆栈2阵列(stk);结束。
(PARI)
SumD(x)={local(s);s=0;while(x>9,s+=x-10*(x\10);x\=10);return(s+x)}
基e(x,b)={局部(d,e,f);e=0;f=1;while(x>0,d=x-b*(x\b);x\=b;e+=d*f;f*=10);返回(e)}
{n=0;对于(m=1,10^9,如果(m%(SumD(baseE(m,4)))==0,则写入(“b064438.txt”,n++,“”,m);如果(n==1000,中断))}\\哈里·史密斯2009年9月14日
(PARI)isok(n)=!(n%总和(n,4))\\米歇尔·马库斯,2018年6月24日
(Python)
从症状合成因子导入数字
打印(如果n%总和(数字(n,4)[1:])==0],则[n代表范围(1201)中的n#因德拉尼尔·戈什2017年4月24日
交叉参考
囊性纤维变性。A005349号(十进制),A049445美元(二进制),A064150型(三元)。
关键词
基础,容易的,美好的,非n
作者
伦·斯迈利2001年10月1日
扩展
更多术语来自马修·康罗伊2001年10月2日
偏移量从0更改为1哈里·史密斯2009年9月14日
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年5月23日03:55。包含372758个序列。(在oeis4上运行。)