login
Numbers that are not the product of a prime and a power (exponent at least 2, base at least 1). Complement of A245303.
1

%I #50 Aug 28 2014 09:21:08

%S 0,1,4,6,9,10,14,15,21,22,25,26,30,33,34,35,36,38,39,42,46,49,51,55,

%T 57,58,60,62,65,66,69,70,74,77,78,82,84,85,86,87,90,91,93,94,95,100,

%U 102,105,106,110,111,114,115,118,119,120,121,122,123,126,129,130

%N Numbers that are not the product of a prime and a power (exponent at least 2, base at least 1). Complement of A245303.

%H Jens Kruse Andersen, <a href="/A240938/b240938.txt">Table of n, a(n) for n = 1..10000</a>

%o (PARI)

%o v=[0];for(n=1,10^3,if(!isprime(n),d=omega(n);f=factor(n);c=0;for(i=1,d,if(ispower(n/f[i,1]),c++;break));if(c==0,v=concat(v,n))));v \\ _Derek Orr_, Aug 27 2014

%Y Cf. A245303.

%K nonn,easy

%O 1,3

%A _Juri-Stepan Gerasimov_, Aug 12 2014