%I#26 2022年5月31日11:02:05
%S 0,0,0,1,2,3,4,5,6,7,8,2,1,0,1,2,3,45,6,1,7,3,2,1,0,
%温度2,3,4,5,6,4,3,2,1,0,1,2,3,4-5,4,2,3,1,2,2,3,6,5,4,1,0,1,2,
%U 3,7,6,5,4,3,2,1,0,1,2,8,7,5,5,3,2
%N以10位数字为基数的N的总变差;请参阅注释。
%C假设一个数字n有以b为基数的数字b(m),b(m-1)。。。,b(0)。n的base-b下变量是所有d(i)-d(i-1)的和DV(n,b),其中d(i;n的基-b上变分是d(k)<d(k-1)的所有d(k-1)-d(k)的UV(n,b)之和。n的总碱基b变化量是总和TV(n,b)=DV(n,b)+UV(n,c)。自然数的相关序列和划分指南:
%C***
%C基b{DV(n,b)}{UV(n,b)}{TV(n,a)}
%丙2 A033264 A037800 A037834
%丙3 A037853 A037844 A037835
%C 4 A037854 A037845 A037836
%C 5 A037855 A037846 A037837
%丙6 A037856 A037847 A037838
%丙7 A037857 A037848 A037839
%丙8 A037858 A037849 A037840
%C 9 A037859 A037850 A037841
%丙10 A037860 A037851 A297330
%丙11 A297231 A297232 A297233
%丙12 A297234 A297235 A297236
%丙13 A297237 A297238 A297239
%丙14 A297240 A297241 A297242
%川15 A297243 A297244 A297245
%丙16 A297246 A297247 A297244
%C对于每个b,设u={n:UV(n,b)<DV(n,b)},e={n:UV(n、b)=DV。集合u、e、d对自然数进行划分。u、e、d的匹配序列指南如下:
%C类***
%C基b序列u序列e序列d
%C 2 A005843 A005408(无)
%丙3 A297249 A297250 A297251
%丙4 A297252 A297253 A297254
%丙5 A297255 A297256 A297257
%丙6 A297258 A297259 A297260
%丙7 A297261 A297262 A297263
%丙8 A297264 A297265 A297266
%丙9 A297267 A297268 A297269
%丙10 A297270 A297271 A297272
%丙11 A297273 A297274 A297275
%丙12 A297276 A297277 A297278
%丙13 A297279 A297280 A297281
%丙14 A297282 A297283 A297284
%C 15 A297285 A297286 A297287
%丙16 A297288 A297289 A297290
%C不是A151950的复本:例如,a(100)=1,但A1511950(100)=11.-_罗伯特·伊斯雷尔,2018年2月6日
%H Clark Kimberling,n的表,n的a(n)=1..10000</a>
%e 13684632的DV=8-4+6-3+3-2=8,UV=3-1+6-3+8-6+6-4=9,因此a(13684631)=DV+UV=17。
%p f:=proc(n)局部L,i;五十: =换算(n,基数,10);
%p添加(abs(L[i+1]-L[i]),i=1..nops(L)-1)结束过程:
%p映射(f,[1..100]美元);#_罗伯特·伊斯雷尔,2018年2月4日
%p#备选方案
%p A297330:=程序(n)
%p A037860(n)+A037851(n);
%p结束程序:#_R.J.Mathar_,2021年9月27日
%t b=10;z=120;t=表格[总计@扁平@地图[Abs@差异@#&,分区[IntegerDigits[n,b],2,1]],{n,z}](*在_Michael De Vlieger_之后,例如A037834*)
%o(Python)
%o定义A297330(n):
%o s=str(n)
%o i在范围(len(s)-1)内的返回和(abs(int(s[i])-int(s[i+1))#_Chai Wah Wu_,2022年5月31日
%Y参见A037851、A297330、A297271和A297272。
%K nonn,基础,简单
%O 1,13号
%A_Clark Kimberling_,2018年1月17日
|