A179791 -id:A179791 - cp's OEIS frontend

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).

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

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

A179800 Values y for record minima of the positive distance d between the thirteenth 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

90, 1262, 34938, 114283, 741455, 5875603, 17403307, 28172943, 709955183, 936209559, 10875326100, 25905378592, 35572991418, 55703353220, 110485434560, 182204642678, 447245502234, 984322154617, 2160608565081, 3477146726351

Offset: 1

Artur Jasinski, Jul 27 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^13.
For d values see A179798.
For x values see A179799.
Conjecture: For any positive number x >= A179799(n), the distance d between the 13th 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}]; yy

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

Original entry on oeis.org

7, 7538, 283261, 494576, 4235622, 7135951, 38053824, 55905695, 185380312, 1208691743, 3263221507, 14034746735, 14732727599, 24211719874, 68491624661, 136264246246, 5337970328375, 6845918569200, 15505738619231, 30037885135088

Offset: 1

Artur Jasinski, Jul 28 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^15.
For x values see A179813.
For y values see A179814.
Conjecture: For any positive number x >= A179813(n), the distance d between the fifteenth power of x and the square of any y (such that x <> k^2 and y <> k^15) can't be less than A179812(n).

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

d = 15; 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

A179813 Values x for record minima of the positive distance d between the fifteenth power of a positive integer x and the square of an integer y such that d = x^15 - y^2 (x <> k^2 and y <> k^15).

Original entry on oeis.org

2, 3, 5, 6, 7, 8, 10, 11, 17, 18, 23, 24, 27, 35, 45, 55, 56, 76, 78, 84, 111, 114, 115, 117, 118, 139, 164, 172, 175, 176, 179, 183, 188, 190, 193, 305, 316, 377, 395, 461, 466, 483, 485, 654, 747, 868, 877, 931, 1045, 1434, 1822, 2199, 2645, 2754, 3171, 3961

Offset: 1

Artur Jasinski, Jul 28 2010

nonn

Distance d is equal to 0 when x = k^2 and y = k^15.
For x values see A179813.
For y values see A179814.
Conjecture: For any positive number x >= A179813(n), the distance d between the fifteenth power of x and the square of any y (such that x <> k^2 and y <> k^15) can't be less than A179812(n).

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

d = 15; 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

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

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

Mathematica

A179800 Values y for record minima of the positive distance d between the thirteenth 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

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

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A179813 Values x for record minima of the positive distance d between the fifteenth power of a positive integer x and the square of an integer y such that d = x^15 - y^2 (x <> k^2 and y <> k^15).

Views

Author

Keywords

Comments

Crossrefs

Programs