cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A185208 Numbers having no divisors d > 1 such that d + 1 are prime powers.

This page as a plain text file.
%I A185208 #22 Sep 07 2013 14:24:26
%S A185208 1,5,11,13,17,19,23,25,29,37,41,43,47,53,55,59,61,65,67,71,73,79,83,
%T A185208 85,89,95,97,101,103,107,109,113,115,121,125,131,137,139,143,145,149,
%U A185208 151,157,163,167,169,173,179,181,185,187,191,193,197,199,205,209
%N A185208 Numbers having no divisors d > 1 such that d + 1 are prime powers.
%C A185208 A141197(a(n)) = A049073(a(n)) = 1.
%C A185208 Contains all primes except for 2 and Mersenne primes A000668. - _Jon Perry_, Nov 11 2012
%C A185208 A composite number is in the sequence iff all its factors are. - _Jon Perry_, Nov 11 2012
%H A185208 Reinhard Zumkeller, <a href="/A185208/b185208.txt">Table of n, a(n) for n = 1..10000</a>
%t A185208 Select[Range[210], Select[Divisors[#] // Rest, PrimeNu[# + 1] == 1 &] == {} &] (* _Jean-François Alcover_, Aug 17 2013 *)
%o A185208 (Haskell)
%o A185208 a185208 n = a185208_list !! (n-1)
%o A185208 a185208_list =  filter ((== 1) . a141197) [1..]
%Y A185208 Cf. A000961, A010055, A027750.
%Y A185208 Cf. A000668.
%K A185208 nonn
%O A185208 1,2
%A A185208 _Reinhard Zumkeller_, Nov 01 2012