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.

Showing 1-4 of 4 results.

A234286 Positive odd numbers n such that 2m - sigma(m) is never equal to n, where sigma(.) is the sum of divisors function A000203. Conjectural.

Original entry on oeis.org

3, 9, 13, 15, 17, 21, 23, 27, 29, 31, 33, 35, 39, 43, 45, 49
Offset: 1

Views

Author

N. J. A. Sloane, Dec 28 2013

Keywords

Comments

The terms shown here are conjectural, based on a search up to 10^20 made by Davis et al. (2013).

Crossrefs

Cf. A000203, A033879 (2n - sigma(n)).
For negative values of n see A234285.

A294347 a(n) is the smallest number whose deficiency or abundance is equal to n, or a(n) = 0 if such a number does not exist.

Original entry on oeis.org

6, 1, 3, 18, 5, 9, 7, 50, 22
Offset: 0

Views

Author

Omar E. Pol, Oct 29 2017

Keywords

Comments

If nonzero, a(9) > 10^9. - Michel Marcus, Oct 29 2017
From Robert Israel, Oct 29 2017: (Start)
If n is odd, then a(n) must be a square or twice a square (A028982).
If nonzero, a(9) > 10^13.
Some other values: a(11)=244036, a(17)=100, a(19)=25, a(25)=98, a(31)=15376, a(37)=484, a(39)=162, a(41)=49, a(47)=225, a(51)=72. (End)
a(n) > 10^20 for n in (9, 13, 15, 21, 23, 27, 29, 33, 35, 43, 45); see the intersection of A234285 and A234286. - Michel Marcus, Oct 30 2017
For the intersection mentioned above see A294406. - Omar E. Pol, Nov 01 2017

Crossrefs

Programs

  • Mathematica
    Table[k = 1; While[Abs[2 k - DivisorSigma[1, k]] != n, k++]; k, {n, 0, 8}] (* Michael De Vlieger, Oct 30 2017 *)
  • PARI
    a(n) = {my(k=1); while (abs(2*k-sigma(k)) != n, k++); k;} \\ Michel Marcus, Oct 29 2017

A294393 a(n) is the smallest number whose deficiency or abundance is equal to 2*n (or 0 if such a number does not exist), minus the n-th odd number.

Original entry on oeis.org

5, 0, 0, 0, 13, 0, 0, 12, 0, 0, 25, 0, 87, 31, 0, 0, 217, 22, 0, 16, 0, 0, 49, 0, 11, 55, 0, 32, 27, 0, 0, 22, 43, 0, 73, 0, 0, 637, 81, 0, 75, 0, 320, 28, 0, 50, 313, 24, 0, 103, 0, 0, 109, 0, 0, 34, 0, 62, 301, 24, -1, 120, 67, 0, 133, 0, 128, 139, 0, 0, 433, 42, 23, 151, 0, 0, 219, 82, 0, 28, 119
Offset: 0

Views

Author

Omar E. Pol, Oct 30 2017

Keywords

Comments

Note that a(60) = -1.

Examples

			--------------------------------------
n    A294386(n) - A005408(n)  =  a(n)
--------------------------------------
0        6            1           5
1        3            3           0
2        5            5           0
3        7            7           0
4       22            9          13
...
		

Crossrefs

Programs

  • PARI
    f(n) = abs(2*n-sigma(n));
    a(n) = my(k=1); while(f(k) != 2*n, k++); k - (2*n+1); \\ Michel Marcus, Oct 31 2017

Formula

a(n) = A294386(n) - A005408(n).

A294406 Positive odd numbers k such that both (sigma(m) - 2*m) and (2*m - sigma(m)) are never equal to k, where sigma(.) is the sum of divisors function A000203 (conjectured).

Original entry on oeis.org

9, 13, 15, 21, 23, 27, 29, 33, 35, 43, 45
Offset: 1

Views

Author

Omar E. Pol, Oct 30 2017

Keywords

Crossrefs

Intersection of A234285 and A234286.
Inspired by Michel Marcus's comment in A294347.
Showing 1-4 of 4 results.