登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
邮编:A179239 整数的置换类,每一类由它的最小成员标识。 23

%我

%S 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,22,23,24,25,26,

%电话27,28,29,30,33,34,35,36,37,38,39,40,44,45,46,47,48,49,50,55,56,57,58,

%U 59,60,66,67,68,69,70,77,78,79,80,88,89,90,99100101102103

%整数的N个置换类,每个由其最小成员标识。

%设正整数n的“置换集”是由n的位数置换而成的所有整数的集合。如果两个整数生成相同的置换集,则两个整数是“置换一致的”。“置换类”是所有置换全等整数的集合。这个序列列出了每个置换类,由它的最小成员标识。

%这些也是按顺序排列的正整数,如果先前列出的d位数字是n的位数的排列,则省略任何d位数字n。

%A328447的C范围:在置换之前具有相同位数的所有数字等价类的最小代表。等价的:数字的顺序不减,但最小的非零位必须在零位之前。当考虑仅依赖于n的数字的函数时,该序列是有用的,例如,n中包含的素数,比照a03993、A039999、a07553和其中的记录A072857(原始数)和A076497,resp。A239196和A239197等-\u M.F.Hasler_2019年10月18日

%H Aaron Dunigan AtLee和Michael De Vlieger,<a href=“/A179239/b179239.txt”>n,a(n)for n=0..10000的表格(前2997个术语来自Aaron Dunigan AtLee;前缀0由\u Georg Fischer_2019年10月24日)

%24的置换集是{24,42},这是它们的等价类模置换,所以列出了24,但没有列出42。

%30的置换集是{3,30},但是3与30不在同一置换类中,因为30不能通过对3的数字进行置换来获得。因此,30与3分开列出。

%e数字89和98也是置换全等的,并形成一个置换类,因此只列出较小的一个。

%t maxTerm=103;(*maxTerm是您希望看到的最大项*)permutationSet[n_Integer]:=FromDigits/@Permutations[IntegerDigits[n]];permutationcongreentq[x_Integer,y_Integer]:=Sort[permutationSet[x]]==Sort[permutationSet[y]];DeleteDuplicates[Range[maxTerm],置换同余q]

%t f[n_u]:=块[{a={0},b={DigitCount[0]},i,w},Do[w=DigitCount@i;追加到[b,w];If[!MemberQ[Most@b,w],AppendTo[a,i]],{i,n}];Rest@a];f@103(*或更快:*)

%[范围@103,LeSequal@IntegerDigits@的目的是希望能有[范围@103,LeSequal@IntegerDigits@的主要目的是,[并将[带到[IntegerDigits@的地方,最后一次是最后一次@DigitCount@的主要方面是,[如愿的@IntegerDigits@@,;;最后,最后一次@DigitCount@只有只有一次;只有一次,只有一次,只有这一次,Lesequal@LeSeqQualeCases[IntegerDigits@只有只有只有其自己的才能,而且他们的d==0]]],[[[如迈克尔.德.德勒勒勒勒勒勒的共同努力,2015年7月14 2015年7*)

%o(PARI)是(n)={my(d=数字(n),i);对于(i=2,#d,如果(d[i])!=0,d=vecextract(d,concat([1],vector(#d-i+1,j,i-1+j));break));d==vecsort(d)| | n/10^赋值(n,10)<10}

%给定一个元素n,在基b中,从序列中找到下一个元素。

%o nxt(n,{b=10})={my(d=数字(n)(n));i=35; d;而(i>0&&d[i]==b-1—1,i—);若(i>1,若(d[i]>0,d[i]++,d[i]=d[1];;);为;为(j=i+1,d#d,d[j]=d[i]=d[i]),如果(i==1,d[i]+++;为(j=2,d#d,d[j]=0),则返回返回;如果(i==1,d[i]+++++++;为(j=2,#2(10^(#d));sum(j=1,#d,d[j]*10^(#d-j))}\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

%o(PARI)select(is_A179239(n)={n==A328447(n)},[0..200])\\\\\\\\\\\\\ F.Hasler_2019年10月18日

%是A009994的变体。

%Y比照A047726、A035927(不同的n位数字的数目,直到数字的排列)。

%Y比照A004186,A328447:n类中最大和最小的代表。

%基诺

%0.3度

%2010年7月4日,Aaron Dunigan AtLee

%E前缀为a(0)=0,作者:M.F.Hasler_2019年10月18日

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

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

上次修改日期:美国东部时间2020年9月23日11:23。包含337310个序列。(运行在oeis4上。)