cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A300914 Records in A045763.

This page as a plain text file.
%I A300914 #15 Apr 03 2023 09:17:05
%S A300914 0,1,3,5,7,9,11,15,16,17,23,25,29,33,39,47,49,55,63,71,73,79,81,87,99,
%T A300914 105,111,115,119,127,129,147,151,157,159,163,167,169,183,199,203,207,
%U A300914 235,241,255,279,301,313,327,329,337,367,373,387,411,417,463,477
%N A300914 Records in A045763.
%H A300914 Michael De Vlieger, <a href="/A300914/b300914.txt">Table of n, a(n) for n = 1..1735</a>
%t A300914 With[{s = Array[1 + # - EulerPhi@ # - DivisorSigma[0, #] &, 700]}, Union@ FoldList[Max, 0, s]]
%t A300914 DeleteDuplicates[Table[n+1-DivisorSigma[0,n]-EulerPhi[n],{n,1000}],GreaterEqual] (* _Harvey P. Dale_, Apr 03 2023 *)
%o A300914 (PARI) lista(nn) = {rec = -1; for (n=1, nn, new = n+1-numdiv(n)-eulerphi(n); if (new > rec, print1(new, ", "); rec = new););} \\ _Michel Marcus_, Mar 18 2018
%Y A300914 Cf. A000005, A000010, A045763, A300859.
%K A300914 nonn
%O A300914 1,3
%A A300914 _Michael De Vlieger_, Mar 15 2018