This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A225676 Numbers n such that A054404(n) does not equal round(n/e). 0
 7, 10, 15, 18, 26, 29, 34, 37, 45, 48, 56, 64, 67, 75, 83, 86, 94, 97, 102, 105, 113, 116, 121, 124, 132, 135, 140, 143, 151, 154, 162, 170, 173, 181, 189, 192, 200, 203, 208, 211, 219, 222, 227, 230, 238, 241, 249 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS MATHEMATICA PR[n_, r_] := (r/n)*Sum[1/k, {k, r, n - 1}]; maxi[li_] := {Do[If[li[[n + 1]] < li[[n]], aux = n; Break[]], {n, 1, Length[li] - 1}], aux}[[2]]; SEQ[1] = 0; SEQ[2] = 1; SEQ[n_] := maxi[Table[PR[n, i], {i, 1, n - 1}]]; Select[Range@400, ! SEQ[#] == Round[#/E] &] CROSSREFS Cf. A054404, A225593. Sequence in context: A020721 A015782 A154681 * A030764 A155716 A025002 Adjacent sequences:  A225673 A225674 A225675 * A225677 A225678 A225679 KEYWORD nonn AUTHOR José María Grau Ribas, May 12 2013 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 June 20 05:01 EDT 2019. Contains 324229 sequences. (Running on oeis4.)