|
|
A217405
|
|
2-adic valuation of A217404.
|
|
2
|
|
|
36, 28, 54, 10, 87, 10, 20, 1, 59, 121, 97, 134, 135, 88, 131, 175, 58, 66
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
See the main sequence corresponding to this one, A217404.
|
|
LINKS
|
|
|
EXAMPLE
|
A217404(1)=(2^36)*(7^15), so that the exponent on 2, 36, is the first term here.
|
|
PROG
|
(PARI) prDigits(n)=my(d=digits(n), v=vector(10)); for(i=1, #d, v[d[i]+1]++); for(i=1, 10, if(!isprime(v[i]), return(0))); 1
list(lim)=my(v=List(), t); for(a=0, log(lim+.5)\log(7), t=7^a; while(t<=lim, if(prDigits(t), listput(v, t)); t<<=1)); apply(k->valuation(k, 2), vecsort(Vec(v))) \\ Charles R Greathouse IV, Sep 19 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|