%I A006919 M4581
%S A006919 8,222,2337,31941,33371313,311123771,7149317941,22931219729,
%T A006919 112084656339,3347911118189,11613496501723,97130517917327,
%U A006919 531832651281459,3331113965338635107,3331113965338635107
%N A006919 Write down all the prime divisors in previous term!.
%D A006919 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences,
Academic Press, 1995 (includes this sequence).
%D A006919 H. Jaleebi, personal communication.
%H A006919 P. De Geest, <a href="http://www.worldofnumbers.com/topic1.htm">Home
Primes</a>
%t A006919 g[ n_ ] := (x = n; d = {}; While[ FactorInteger[ x ] != {}, f = FactorInteger[
x, FactorComplete -> True ][ [ 1, 1 ] ]; x = x/f; AppendTo[ d, IntegerDigits[
f ] ] ]; FromDigits[ Flatten[ d ] ]); NestList[ g, 8, 15 ]
%Y A006919 Cf. A056938, A037271-A037276, A048985, A048986, A049065.
%Y A006919 Sequence in context: A000442 A115964 A055350 this_sequence A013377 A033508
A111836
%Y A006919 Adjacent sequences: A006916 A006917 A006918 this_sequence A006920 A006921
A006922
%K A006919 nonn,base,nice
%O A006919 1,1
%A A006919 N. J. A. Sloane (njas(AT)research.att.com).
%E A006919 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 05 2000, who
remarks that sequence stabilizes at 13th term with a prime.
|