%I#5 2017年5月17日22:45:25
%S 1,3,4,7,8,9,10,11,13,14,15,16,17,18,19,23,24,25,26,27,28,29,30,31,33,
%电话:34,35,36,37,38,39,40,41,42,43,45,46,47,48,49,50,51,52,53,54,55,56,57,
%U 59、60、61、62、63、64、65、66、67、68、69、70、71、72、73、75、76、77、78、79、80、81、82
%N>1时,N a(N)=N+a(楼层(sqrt(N)));a(1)=1。
%H Robert Israel,n的表,a(n)表示n=1..10000</a>
%F a(1)=1;当n>1时,a(n)=n+a(楼层(sqrt(n)))。
%pf:=proc(n)选项记忆;n+进程名称(楼层(sqrt(n)))结束进程:
%p f(1):=1:
%p映射(f,[1..100]美元);#_Robert Israel_,2017年5月17日
%Y参考A097043(n-a(楼层(平方米)))。
%K nonn公司
%O 1,2号机组
%A _Rick L.Shepherd_,2004年7月20日
|