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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A082814 Values of m associated with A082813. 3
12, 88, 207 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

No more terms below 822. - W. Edwin Clark, May 24 2003

No more terms below 4000. - Hugo Pfoertner, May 28 2003

No more terms < 25500. - Martin Renner, Jan 31 2013

LINKS

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

Hugo Pfoertner, Search for further terms

MAPLE

A:=[]:

for n from 4 to 210 do

  if not(isprime(n)) then

    F:=ifactors(n)[2];

    if nops(F)>1 then

      s:=sum(F['i'][2]*F['i'][1]^n, 'i'=1..nops(F));

      if isprime(s) then A:=[op(A), n]; print(n): fi;

    fi:

  fi:

od: # Martin Renner, Jan 31 2013

PROG

(PARI) for(m=1, +oo, f=factor(m); ispseudoprime(sum(i=1, matsize(f)[1], f[i, 1]^m*f[i, 2])) && print1(m, ", ")) \\ Jeppe Stig Nielsen, Oct 27 2018

CROSSREFS

Cf. A082813.

Sequence in context: A137207 A206765 A228500 * A178257 A057406 A125349

Adjacent sequences:  A082811 A082812 A082813 * A082815 A082816 A082817

KEYWORD

nonn,bref,more,hard

AUTHOR

N. J. A. Sloane, May 24 2003

EXTENSIONS

a(2) and a(3) from Joshua Zucker, May 24 2003

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 23 05:58 EST 2019. Contains 320411 sequences. (Running on oeis4.)