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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A091697 Values of m corresponding to members of A088966. 1
2, 3, 5, 9, 17, 33, 65, 35, 129, 257, 513, 1025, 2049 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

For every k >= 0, 2^k + 1 is in the sequence.

LINKS

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

EXAMPLE

a(2) = 3, corresponding to A088966(2) = 8 because A007947(8) = A007947(3+1) and A007947(3) = A007947(8+1).

MAPLE

rad:= n -> convert(numtheory:-factorset(n), `*`):

count:= 0: lastr:= rad(1):

for n from 2 to 10^7 do

  newr:= rad(n);

  P[lastr, newr]:= n-1;

  if assigned(P[newr, lastr]) then

    count:= count+1; A[count]:= n-1; M[count]:= P[newr, lastr];

  fi;

  lastr:= newr;

od:

seq(M[n], n=1..count); # Robert Israel, Aug 11 2014

CROSSREFS

Sequence in context: A049858 A092483 A005257 * A109740 A248155 A000051

Adjacent sequences:  A091694 A091695 A091696 * A091698 A091699 A091700

KEYWORD

more,nonn,less

AUTHOR

David Wasserman, Jan 29 2004

EXTENSIONS

a(13) from Robert Israel, Aug 11 2014

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 June 23 21:29 EDT 2017. Contains 288675 sequences.