|
|
|
|
#7通过乔恩·肖恩菲尔德2015年8月1日星期六13:53:40 EDT |
|
|
|
#6通过乔恩·肖恩菲尔德2015年8月1日星期六13:53:38 EDT |
| 数学
|
f[s_List]:=块[{a=s[[-1]],len=长度@s},追加[s,如果[Mod[len,13]==0,Mod[a*len/13,13],Mod[a*len,13]]];嵌套[f,{1},100] [发件人_] (* _Robert G.Wilson v_,2009年5月3日]*)
|
|
|
|
#5通过乔恩·肖恩菲尔德2015年8月1日星期六13:53:22 EDT |
| 数学
|
f[n_]:=块[{id=整数位数[n!,13]},而[id[[-1]]==0,id=最多@id]; 编号[[-1]]];表[f@n,{n,0,100}] [发件人_}] (* _Robert G.Wilson v_,2009年5月3日]*)
|
| 状态
|
经核准的
编辑
|
|
|
|
#4通过俄罗斯考克斯2012年3月30日星期五18:55:32 EDT |
| 作者
|
_卡尔·R·怀特(欧伊斯凡(自动变速箱)磷酸盐.网),_,2008年1月16日
|
|
|
讨论
|
3月30日星期五
| 18时55分
| OEIS服务器: https://oeis.org/edit/global/278
|
|
|
|
#3通过俄罗斯考克斯2012年3月30日星期五17:31:23 EDT |
| 数学
|
f[s_List]:=块[{a=s[[-1]],len=长度@s},追加[s,如果[Mod[len,13]==0,Mod[a*len/13,13],Mod[a*len,13]]];嵌套[f,{1},100][来自 _罗伯特·威尔逊v(rgwv(相对湿度)(自动变速箱)rgwv(相对湿度).通用域名格式),_,2009年5月3日]
f[n_]:=块[{id=整数位数[n!,13]},而[id[[-1]]==0,id=最多@id]; 编号[[-1]]];表[f@n,{n,0,100}][来自 _罗伯特·威尔逊v(rgwv(相对湿度)(自动变速箱)rgwv(相对湿度).通用域名格式),_,2009年5月3日]
|
|
|
讨论
|
3月30日星期五
| 17:31
| OEIS服务器: https://oeis.org/edit/global/156
|
|
|
|
#2通过N.J.A.斯隆2010年6月1日星期二美国东部夏令时03:00:00 |
| 数学
|
f[s_List]:=块[{a=s[[-1]],len=长度@s},追加[s,如果[Mod[len,13]==0,Mod[a*len/13,13],Mod[a*len,13]]];Nest[f,{1},100][摘自Robert G.Wilson v(rgwv(AT)rgwv.com),2009年5月3日]
f[n_]:=块[{id=整数位数[n!,13]},而[id[[-1]]==0,id=最多@id]; 编号[[-1]]];表[f@n,{n,0,100}][摘自Robert G.Wilson v(rgwv(AT)rgwv.com),2009年5月3日]
|
| 关键词
|
基础,容易的,非n,新的
|
|
|
|
#1通过N.J.A.斯隆2008年6月29日,美国东部夏令时03:00:00 |
| 名称
|
n的最后一个非零数字!在底座13中。
|
| 数据
|
1、1、2、6、11、3、5、9、7、11、6、1、12、12、11、7、2、10、8、4、6、2、7、12、1、2、2、4、12、9、6、10、5、1、9、12、2、11、7、7、1、3、12、8、9、11、10、12、3、7、6、11、9、1、4、7、3、8、12、4、1、11、2、10、7、8、6、4、11、12、5、6,8,10,3,5,5,10,4,3,2,12,6,9,3,4,5,8,4
|
| 偏移
|
0,3
|
| 例子
|
6! = 720位小数=435位三位小数,因此a(6)=5。
|
| 交叉参考
|
囊性纤维变性。A000142号,A136690型,A136691号,A136692号,136693英镑,A136694号,A136695号,A136696号,A008904号,A136697号,136698英镑,136700澳元,A136701号,A136702号.
|
| 关键词
|
基础,容易的,非n
|
| 作者
|
Carl R.White(欧司凡(AT)phodd.net),2008年1月16日
|
| 状态
|
经核准的
|
|
|
|