The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A334213 Numbers m such that m^k + 1 is squarefree for all 0 <= k <= m. 2
 0, 1, 2, 4, 6, 10, 16, 30, 36, 46, 256 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS m = 2^i is a term iff k*i is not in A049096 with 0 < k < m + 1. Up to i = 128, there are no more terms of the form 2^i. a(12) > 10^7, if it exists. - Jinyuan Wang, May 01 2020 LINKS EXAMPLE 4^0 + 1 = 2 is squarefree, 4^1 + 1 = 5 is squarefree, 4^2 + 1 = 17 is squarefree, 4^3 + 1 = 5*13 is squarefree and 4^4 + 1 = 257 is squarefree, so 4 is in the sequence. MATHEMATICA Do[L=Length[a]; a=Select[a=m^Range[0, m-1]+1, SquareFreeQ[#]&]; If[L==m-1, Print[m-1]], {m, 0, 1000}] (* Metin Sariyar, Apr 21 2020 *) PROG (PARI) isOK(m) = k=0; until(k>m, if(!issquarefree(m^k+1), return(0)); k++); 1; for(m=0, 99, if(isOK(m), print1(m, ", "))) CROSSREFS Cf. A049096, A334212, A334214. Sequence in context: A288599 A067880 A059749 * A164142 A048833 A204656 Adjacent sequences:  A334210 A334211 A334212 * A334214 A334215 A334216 KEYWORD nonn,more AUTHOR Gionata Neri, Apr 18 2020 EXTENSIONS a(11) from Jinyuan Wang, May 01 2020 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.

Last modified September 23 20:42 EDT 2021. Contains 347617 sequences. (Running on oeis4.)