A092983 Least squarefree number > n!.

2, 3, 7, 26, 122, 721, 5042, 40321, 362881, 3628801, 39916801, 479001602, 6227020801, 87178291201, 1307674368001, 20922789888001, 355687428096001, 6402373705728001, 121645100408832001, 2432902008176640001

Offset: 1

Author

Amarnath Murthy, Mar 28 2004

Keywords

• nonn

Examples

			a(5) = 122 as 121 is not squarefree.
		

Crossrefs

Cf. A092984.

Programs

Mathematica

lsf[n_]:=Module[{i=1},While[!SquareFreeQ[n+i],i++];n+i]; lsf/@(Range[20]!)  (* Harvey P. Dale, Apr 06 2011 *)

PARI

a(n)=for(i=n!+1,n!+n,if(issquarefree(i),return(i)))

Extensions

Corrected and extended by Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Mar 29 2004