login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A275384 Composite squarefree numbers such that the arithmetic mean of its prime factors is an integer. 0
15, 21, 33, 35, 39, 42, 51, 55, 57, 65, 69, 77, 78, 85, 87, 91, 93, 95, 105, 110, 111, 114, 115, 119, 123, 129, 133, 141, 143, 145, 155, 159, 161, 170, 177, 183, 185, 186, 187, 195, 201, 203, 205, 209, 213, 215, 217, 219, 221, 222, 230, 231, 235, 237, 247, 249, 253, 258, 259, 265, 267 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Sopf(a(n)) is multiple of omega(a(n)) (sopf(n) is the sum of the distinct prime factors of n, and omega(n) is the number of distinct primes dividing n).

This sequence is subsequence of A078177 and supersequence of A187073.

LINKS

Table of n, a(n) for n=1..61.

EXAMPLE

170 is in the sequence because 170=17*2*5 (squarefree number) and (17+2+5)/3 = 8 is integer.

MATHEMATICA

Select[Range@ 270, And[CompositeQ@ #, SquareFreeQ@ #, IntegerQ@ Mean@ FactorInteger[#][[All, 1]]] &] (* Michael De Vlieger, Jul 25 2016 *)

PROG

(PARI) sopf(n)= my(f, s=0); f=factor(n); for(i=1, matsize(f)[1], s+=f[i, 1]); s

for(i=2, 500, if(issquarefree(i)&&!isprime(i), m=sopf(i)/omega(i); if(m==truncate(m), print1(i, ", "))))

CROSSREFS

Cf. A005117, A078177, A134344, A187073, A229094.

Sequence in context: A285800 A184041 A070005 * A185307 A061346 A098905

Adjacent sequences:  A275381 A275382 A275383 * A275385 A275386 A275387

KEYWORD

nonn

AUTHOR

Antonio Roldán, Jul 25 2016

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy .

Last modified January 21 13:52 EST 2018. Contains 297994 sequences.