login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A114127 Numbers that factorize into a prime number of prime factors each raised to a prime exponent. 1

%I #7 Dec 01 2018 11:39:33

%S 36,72,100,108,196,200,216,225,288,392,441,484,500,675,676,800,864,

%T 900,968,972,1000,1089,1125,1152,1156,1225,1323,1352,1372,1444,1521,

%U 1568,1764,1800,1944,2116,2312,2601,2700,2744,2888,3025,3087,3200,3249,3267

%N Numbers that factorize into a prime number of prime factors each raised to a prime exponent.

%H Harvey P. Dale, <a href="/A114127/b114127.txt">Table of n, a(n) for n = 1..1000</a>

%t fpnQ[n_]:=Module[{f=FactorInteger[n]},AllTrue[Flatten[Join[{Length[f],f[[All,2]]}]],PrimeQ]]; Select[Range[3300],fpnQ] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Dec 01 2018 *)

%K nonn

%O 1,1

%A _Jon Wild_, Feb 14 2006

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 07:46 EDT 2024. Contains 371235 sequences. (Running on oeis4.)