|
%I #6 Apr 05 2017 05:37:13
%S 2,8,12,16,20,38,62,86,110,148,168,188,208,228,272,292,312,332,352,
%T 396,416,436,456,476,520,540,560,580,600,698,818,938,1058,1178,1322,
%U 1442,1562,1682,1802,1946,2066,2186,2306,2426,2570,2690,2810,2930,3050,3248,3348
%N Fixed points of the transform A284801.
%e 86 is a term of the sequence because 86 in base 5 is 321, its complement in base 5 is 123 and the digit reverse is again 321 that is 86 in base 10.
%p P:=proc(q,h) local a,b,k,n; for n from 1 to q do a:=convert(n,base,h); b:=0;
%p for k from 1 to nops(a) do a[k]:=h-1-a[k]; b:=h*b+a[k]; od; if b=n then print(n); fi; od; end: P(10^2,5);
%Y Cf. A035928, A284801.
%K nonn,base,easy
%O 1,1
%A _Paolo P. Lava_, Apr 03 2017
|
