id:A107039 - OEIS Search Results

Search: id:A107039

Displaying 1-1 of 1 results found.

page 1

First differences of indices of square-free Jacobsthal numbers.

+0
2

1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 3, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1 (list; graph; listen)

	OFFSET	`0,8`
	COMMENT	`First differences of A107037.`
	MAPLE	`A001045 := proc(n) option remember : if n <= 1 then n; else A001045(n-1)+2*A001045(n-2) ; fi ; end: A107037 := proc(nmax) local a, n; a := [] ; n := 1: while nops(a) < nmax do if numtheory[issqrfree]( A001045(n) ) then a := [op(a), n] ; fi ; n := n+1: od : RETURN(a) ; end: A107039 := proc(nmax) local a107037 ; a107037 := A107037(nmax+1) : [seq( a107037[i]-a107037[i-1], i=2..nmax)] ; end: op(A107039(120)) ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 12 2007`
	CROSSREFS	`Cf. A001045.` `Sequence in context: A031279 A124778 A037831 this_sequence A030615 A147753 A116531` `Adjacent sequences: A107036 A107037 A107038 this_sequence A107040 A107041 A107042`
	KEYWORD	`nonn`
	AUTHOR	`Paul Barry (pbarry(AT)wit.ie), May 09 2005`
	EXTENSIONS	`More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 12 2007`

page 1

Search completed in 0.002 seconds

Last modified December 1 19:18 EST 2009. Contains 167806 sequences.

AT&T Labs Research