Search: id:A107656
Results 1-1 of 1 results found.

%I A107656
%S A107656 1,2,3,4,652245
%N A107656 Numbers n such that prime(n)=d(n)*phi(n)+1, where d(n) is number of positive 
               divisors of n.
%C A107656 There is no further term up to 5*10^7.
%e A107656 652245 is in the sequence because prime(652245)=d(652245)*phi(652245)+1.
%t A107656 Do[If[Prime[n] == DivisorSigma[0, n]*EulerPhi[n] + 1, Print[n]], {n, 
               50000000}]
%Y A107656 Cf. A104905, A107657.
%Y A107656 Sequence in context: A062929 A038105 A143716 this_sequence A024595 A144804 
               A118308
%Y A107656 Adjacent sequences: A107653 A107654 A107655 this_sequence A107657 A107658 
               A107659
%K A107656 more,nonn
%O A107656 1,2
%A A107656 Farideh Firoozbakht (mymontain(AT)yahoo.com), Jun 06 2005

Search completed in 0.001 seconds