OFFSET
1,1
COMMENTS
A097220 is a subsequence of this sequence.
EXAMPLE
90942236 is in the sequence because Pi(90942236)=909*42*23*6 in fact a1=909, a2=42, a3=23 & a4=6.
PROG
(PARI) composed(n, a)=my(d=0, k); if(a>=n, return(a==n)); while(10^d<n, k=n%10^d++; if(k>0&a%k==0&composed(n\10^d, a/k), return(1))); 0
isA097221(n)=composed(n, primepi(n))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Farideh Firoozbakht, Aug 05 2004
EXTENSIONS
Corrected (2537,3277,4513,4626 were missing), extended, edited, and program added by Charles R Greathouse IV, Apr 23 2010
STATUS
approved