A292868 Records in A243823.

0, 1, 3, 4, 5, 6, 8, 9, 11, 13, 14, 16, 17, 18, 19, 20, 21, 22, 23, 25, 26, 27, 31, 32, 35, 36, 38, 39, 40, 45, 46, 52, 53, 54, 55, 58, 60, 62, 68, 74, 78, 79, 85, 90, 98, 104, 108, 119, 120, 123, 126, 128, 135, 136, 142, 144, 146, 153, 158, 164, 166, 171, 176

Offset

1,3

Comments

See A292867 for comments, linked tables, and conjectures. - Michael De Vlieger, Nov 17 2017

Links

Michael De Vlieger, Table of n, a(n) for n = 1..1500

Example

First 20 terms and their positions b(n) in A243823:
   n  a(n) b(n)
  -------------
   1    0    1
   2    1    8
   3    3   14
   4    4   16
   5    5   20
   6    6   22
   7    8   26
   8    9   28
   9   11   32
  10   13   38
  11   14   40
  12   16   44
  13   17   46
  14   18   48
  15   19   50
  16   20   52
  17   21   54
  18   22   56
  19   23   58
  20   25   62

Mathematica

Union@ FoldList[Max, Table[Count[Range[4, n - 2], _?(Nor[CoprimeQ[#, n], PowerMod[n, Floor@ Log2@ n, #] == 0] &)], {n, 312}]] (*  Michael De Vlieger, Oct 02 2017 *)

Crossrefs

Cf. A243823, A272619, A292867.

Sequence in context: A026460 A026464 A191885 * A051957 A139483 A051954

Adjacent sequences: A292865 A292866 A292867 * A292869 A292870 A292871

Keyword

nonn

Author

Michael De Vlieger, Oct 02 2017

Status

approved