A135464 Numbers n with property that for each single digit d of the base 3 expansion of n, we can also see the base 3 expansion of d^2 as a substring. Also n may not contain any 0 digits.
1, 11, 111, 112, 211, 1111, 1112, 1121, 1122, 1211, 2111, 2112, 2211, 11111, 11112, 11121, 11122, 11211, 11212, 11221, 11222, 12111, 12112, 12211, 21111, 21112, 21121, 21122, 21211, 22111, 22112, 22211, 111111, 111112, 111121
Offset: 1
Links
- David Applegate, Table of n, a(n) for n = 1..300
Programs
-
AWK
awk 'function g(s,v,n){if (n==0){if (index(s,"2")==0||index(s,"11")>0)print v;}else{g(s "1",v*3+1,n-1); g(s "2",v*3+2,n-1);}}BEGIN{for (i=1; i<=8; i++)g("",0,i);}' # David Applegate (C++) // See the Applegate link in A135463.
Comments