A030089 - OEIS

%I #8 Aug 13 2024 21:31:43

%S 8,27,343,79507,103823,148877,3869893,11089567,18191447,115501303,

%T 192100033,202262003,557441767,100999381393,181033328393,294477807077,

%U 369682454233,569104495903,815565876607,19199315959433

%N a(n) = prime^3 and digits of prime do not appear in a(n).

%F a(n) = A030087(n)^3. - _Andrew Howroyd_, Aug 13 2024

%t #^3&/@Select[Prime[Range[3000]],Intersection[ IntegerDigits[#], IntegerDigits[ #^3]]=={}&] (* _Harvey P. Dale_, Apr 18 2019 *)

%Y Cf. A030087.

%K nonn,base

%O 1,1

%A _Patrick De Geest_

%E Offset corrected by _Andrew Howroyd_, Aug 13 2024