%I #13 Jul 27 2013 12:50:45
%S 1,10,11,20,22,32,52,56,88,100,101,104,125,160,175,176,182,200,212,
%T 218,223,227,248,262,263,293,295,323,331,338,341,362,377,386,394,397,
%U 398,409,410,439,442,446,457,481,499,508,521,526,533,563,571,595,599,611
%N Numbers n such that digital sum of n divides digital sum of n-th prime, p(n).
%e 52 is in the sequence because prime(52)=239 and 5+2=7 divides 2+3+9=14.
%o (PARI) sod(n) = {digs = digits(n, 10); return (sum(j=1, #digs, digs[j]));}
%o isok(n) = (sod(prime(n)) % sod(n) == 0) \\ _Michel Marcus_, Jul 27 2013
%Y Cf. A007605, A007953.
%K nonn,base
%O 1,2
%A _Lekraj Beedassy_, Oct 23 2003
%E More terms from _Ray Chandler_, Oct 25 2003
|