A179786 -id:A179786 - cp's OEIS frontend

A179784 Records for minima of the positive distance d between the seventh power of a positive integer x and the square of an integer y such that d = x^7 - y^2 (x <> k^2 and y <> k^7).

7, 71, 95, 448, 1756, 2215, 3983, 6271, 15231, 26775, 26870, 57475, 102703, 221916, 257963, 9053750, 9297464, 9321703, 27188154, 48787589, 62396287, 83146412, 152244535, 44475611670, 74378479183, 179884971502, 929051699593

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^7.
For x values see A179785.
For y values see A179786.
Conjecture (Artur Jasinski): For any positive number x >= A179785(n), the distance d between the seventh power of x and the square of any y (such that x <> k^2 and y <> k^7) can't be less than A179784(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179785, A179786.

d = 7; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; dd

A179785 Values x for records of minima of the positive distance d between the seventh power of a positive integer x and the square of an integer y such that d = x^7 - y^2 (x <> k^2 and y <> k^7).

Original entry on oeis.org

2, 3, 6, 8, 10, 14, 18, 20, 28, 30, 39, 55, 59, 88, 239, 255, 257, 374, 387, 477, 1136, 1221, 9104, 10959, 35962, 43783, 96569, 148544, 183163, 194933, 313592, 842163, 1254392, 1468637, 1506412, 2377393, 2407523, 4636475, 5756417, 6615968

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^7.
For d values see A179784.
For y values see A179786.
Conjecture (Artur Jasinski): For any positive number x >= A179785(n), the distance d between the seventh power of x and the square of any y (such that x <> k^2 and y <> k^7) can't be less than A179784(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179786.

d = 7; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; xx

A179790 Records for minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Original entry on oeis.org

28, 83, 1516, 3420, 5503, 30889, 75228, 776563, 2428283, 3035356, 29901479, 68334642, 113284785, 776887258, 1719856432, 3353407292, 19232010711, 27678166236, 29160146546, 305337557432, 95950163566107, 114852386371373

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^9.
For x values see A179791.
For y values see A179792.
Conjecture (Artur Jasinski): For any positive number x >= A179791(n), the distance d between the ninth power of x and the square of any y (such that x <> k^2 and y <> k^9) can't be less than A179790(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 9; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; dd

A179791 Values x for records of the minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Original entry on oeis.org

2, 3, 5, 6, 8, 13, 22, 23, 27, 62, 78, 147, 181, 203, 233, 468, 892, 1110, 1827, 3657, 3723, 10637, 11145, 11478, 12275, 16764, 19151, 22719, 23580, 24974, 30163, 36885, 41759, 41948, 44427, 66443, 86167, 96658, 115992, 222962, 248461, 248588, 384573

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^9.
For d values see A179790.
For y values see A179792.
Conjecture (Artur Jasinski): For any positive number x >= A179791(n), the distance d between the ninth power of x and the square of any y (such that x <> k^2 and y <> k^9) can't be less than A179790(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 9; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; xx

A179792 Values y for records of the minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Original entry on oeis.org

22, 140, 1397, 3174, 11585, 102978, 1098758, 1342070, 2761448, 116348986, 326908123, 5661454305, 14439547606, 24195364585, 44988513611, 1037782490126, 18907836782131, 50577039498042, 476237361126871, 10815891488601655

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^9.
For d values see A179790.
For x values see A179791.
Conjecture (Artur Jasinski): For any positive number x >= A179791(n), the distance d between the ninth power of x and the square of any y (such that x <> k^2 and y <> k^9) can't be less than A179790(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 9; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; yy

A179793 Records of minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Original entry on oeis.org

23, 747, 8847, 12654, 166831, 484471, 573055, 1248668, 1602775, 8764352, 72820023, 94338007, 143404871, 155195023, 262310000, 1529935249, 4884962400, 19571071932, 146228748359, 318603821009, 635586109888, 1305633968055

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^11.
For x values see A179794.
For x values see A179795.
Conjecture (Artur Jasinski): For any positive number x >= A179794(n), the distance d between the eleventh power of x and the square of any y (such that x <> k^2 and y <> k^11) can't be less than A179793(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 11; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; dd

A179794 Values x for records of the minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Original entry on oeis.org

2, 3, 6, 7, 8, 10, 14, 18, 20, 26, 28, 32, 38, 52, 60, 77, 145, 168, 222, 237, 268, 279, 286, 359, 367, 390, 536, 569, 622, 872, 1085, 1349, 1462, 1760, 1932, 2423, 2801, 5559, 5925, 7052, 8383, 8752, 10075, 11917, 15712, 17420, 17598, 23712, 26026, 28095

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^11.
For x values see A179794.
For x values see A179795.
Conjecture (Artur Jasinski): For any positive number x >= A179794(n), the distance d between the eleventh power of x and the square of any y (such that x <> k^2 and y <> k^11) can't be less than A179793(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 11; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; xx

A179795 Values y for records of the minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Original entry on oeis.org

45, 420, 19047, 44467, 92681, 316227, 2012353, 8016758, 14310835, 60583368, 91068707, 189812531, 488438379, 2741690265, 6023263700, 23751934582, 771834189385, 1734606819630, 8034176335637, 11511075516802, 22632960587688

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^11.
For x values see A179794.
For x values see A179795.
Conjecture (Artur Jasinski):
For any positive number x >= A179794(n), the distance d between the eleventh power of x and the square of any y (such that x <> k^2 and y <> k^11) can't be less than A179793(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795.

d = 11; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; yy

A179798 Record minima of the positive distance d between the 11th power of a positive integer x and the square of an integer y such that d = x^13 - y^2 (x <> k^2 and y <> k^13).

Original entry on oeis.org

92, 1679, 39281, 89927, 296863, 1530322, 12056004, 55972895, 67903894, 102383343, 641211875, 5148097536, 13764973788, 19839459725, 87957606400, 113794567580, 126889914716, 146745583311, 880304597278, 1154049177924

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^13.
For x values see A179799.
For x values see A179800.
Conjecture (Artur Jasinski):
For any positive number x >= A179799(n), the distance d between the eleventh power of x and the square of any y (such that x <> k^2 and y <> k^13) can't be less than A179798(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795, A179798, A179799, A179800.

d = 13; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; dd

A179799 Values x for records of minima of the positive distance d between an 11th power of a positive integer x and a square of an integer y such that d = x^13 - y^2 (x<>k^2 and y<>k^13).

Original entry on oeis.org

2, 3, 5, 6, 8, 11, 13, 14, 23, 24, 35, 40, 42, 45, 50, 54, 62, 70, 79, 85, 88, 89, 142, 152, 220, 345, 353, 364, 412, 416, 455, 627, 734, 743, 911, 921, 1068, 1095, 1294, 1894, 2398, 2719, 2887, 3015, 3623, 3814, 5837, 6226, 8603, 8669, 8971, 9987, 12683

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d = 0 when x = k^2 and y = k^13.
For d values see A179798.
For y values see A179800.
Conjecture: For any positive number x >= A179799(n) the distance d between the 11th power of x and the square of any y (such that x<>k^2 and y<>k^13) can't be less than A179798(n).

Cf. A179107, A179108, A179109, A179386, A179387, A179388, A179407, A179408, A179784, A179785, A179786, A179790, A179791, A179792, A179793, A179794, A179795, A179798, A179799, A179800.

d = 13; max = 1000; vecd = Table[10^100, {n, 1, max}]; vecx = Table[10^100, {n, 1, max}]; vecy = Table[10^100, {n, 1, max}]; len = 1; Do[m = Floor[(n^d)^(1/2)]; k = n^d - m^2; If[k != 0, ile = 0; Do[If[vecd[[z]] < k, ile = ile + 1], {z, 1, len}]; len = ile + 1; vecd[[len]] = k; vecx[[len]] = n; vecy[[len]] = m], {n, 1, 10000000}]; dd = {}; xx = {}; yy = {}; Do[AppendTo[dd, vecd[[n]]]; AppendTo[xx, vecx[[n]]]; AppendTo[yy, vecy[[n]]], {n, 1, len}]; xx

cp's OEIS Frontend

A179784 Records for minima of the positive distance d between the seventh power of a positive integer x and the square of an integer y such that d = x^7 - y^2 (x <> k^2 and y <> k^7).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179785 Values x for records of minima of the positive distance d between the seventh power of a positive integer x and the square of an integer y such that d = x^7 - y^2 (x <> k^2 and y <> k^7).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179790 Records for minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179791 Values x for records of the minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179792 Values y for records of the minima of the positive distance d between the ninth power of a positive integer x and the square of an integer y such that d = x^9 - y^2 (x <> k^2 and y <> k^9).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179793 Records of minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179794 Values x for records of the minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179795 Values y for records of the minima of the positive distance d between the eleventh power of a positive integer x and the square of an integer y such that d = x^11 - y^2 (x <> k^2 and y <> k^11).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179798 Record minima of the positive distance d between the 11th power of a positive integer x and the square of an integer y such that d = x^13 - y^2 (x <> k^2 and y <> k^13).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179799 Values x for records of minima of the positive distance d between an 11th power of a positive integer x and a square of an integer y such that d = x^13 - y^2 (x<>k^2 and y<>k^13).

Views

Author

Keywords

Comments

Crossrefs

Programs