A235639 -id:A235639 - cp's OEIS frontend

A235615 Primes whose base-5 representation also is the base-4 representation of a prime.

2, 3, 13, 41, 43, 61, 181, 191, 263, 281, 283, 331, 383, 431, 443, 463, 641, 643, 661, 881, 911, 1063, 1091, 1291, 1303, 1531, 1693, 2083, 2143, 2203, 2293, 2341, 3163, 3181, 3191, 3253, 3343, 3593, 3761, 3931, 4001, 4093, 4391, 4691, 4793, 5011, 5393, 5413, 5441, 6301

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			Both 13 = 23_5 and 23_4 = 11 are prime.

Robert Price, Table of n, a(n) for n = 1..107268
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235474, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

is(p,b=4,c=5)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,5,4)&&print1(vector(#d=digits(p,4),i,5^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,4,5)

A235635 Primes whose base-5 representation is also the base-7 representation of a prime.

Original entry on oeis.org

2, 3, 5, 13, 17, 23, 29, 41, 43, 47, 53, 59, 61, 71, 79, 83, 101, 103, 137, 157, 163, 181, 191, 223, 227, 239, 281, 347, 379, 383, 419, 443, 463, 479, 547, 563, 571, 593, 641, 691, 701, 743, 757, 811, 839, 863, 877, 967, 997, 1049, 1051, 1087, 1097, 1109, 1151, 1171, 1217, 1249, 1259, 1283

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of a two-dimensional array of sequences, given in the LINK, based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			17 = 32_5 and 32_7 = 23 are both prime, so 17 is a term.

Giovanni Resta, Table of n, a(n) for n = 1..10000
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235627, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

Select[Prime@Range@500, PrimeQ@FromDigits[IntegerDigits[#, 5], 7] &] (* Giovanni Resta, Sep 12 2019 *)

is(p,b=7,c=5)=isprime(vector(#d=digits(p,c),i,b^(#d-i))*d~)&&isprime(p) \\ Note: This code is only valid for b > c.

A235616 Primes whose base-6 representation also is the base-4 representation of a prime.

Original entry on oeis.org

2, 3, 7, 19, 37, 79, 127, 229, 307, 487, 523, 547, 727, 733, 757, 1297, 1423, 1549, 1567, 1627, 1747, 1777, 2647, 2683, 2713, 2857, 2887, 3067, 3361, 3889, 3943, 4003, 4153, 4441, 4651, 4663, 7789, 7867, 8209, 8263, 8293, 8317, 8443, 8467, 9109, 9157, 9343, 9547, 9733

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			E.g., 7 = 11_6 and 11_4 = 5 are both prime.

Robert Price, Table of n, a(n) for n = 1..24874
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235624, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

is(p,b=4,c=6)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,6,4)&&print1(vector(#d=digits(p,4),i,6^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,4,6)

A235638 Primes whose base-8 representation also is the base-6 representation of a prime.

Original entry on oeis.org

2, 3, 5, 13, 17, 29, 37, 41, 73, 97, 109, 137, 149, 173, 193, 197, 229, 233, 281, 293, 337, 521, 541, 557, 601, 613, 617, 673, 677, 733, 797, 877, 1033, 1061, 1069, 1117, 1129, 1217, 1237, 1301, 1321, 1381, 1549, 1553, 1609, 1621, 1693, 1733, 1889, 1901, 2069, 2137, 2221, 2273, 2309

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			E.g., 13 = 15_8 and 15_6 = 11 are both prime.

Robert Price, Table of n, a(n) for n = 1..11493
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235631, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

is(p,b=6,c=8)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,8,6)&&print1(vector(#d=digits(p,6),i,8^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,6,8)

A231480 Primes whose base-8 representation is also the base-9 representation of a prime.

Original entry on oeis.org

2, 3, 5, 7, 17, 37, 53, 79, 89, 109, 127, 223, 263, 277, 367, 389, 433, 439, 457, 479, 521, 541, 577, 593, 709, 727, 757, 911, 953, 967, 983, 1061, 1097, 1117, 1151, 1153, 1297, 1447, 1567, 1583, 1601, 1637, 1693, 1709, 1801, 1879, 1933, 1951, 2017, 2069, 2081, 2213, 2269

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of a two-dimensional array of sequences, given in the LINK, based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			17 = 21_8 and 21_9 = 19 are both prime, so 17 is a term.

Giovanni Resta, Table of n, a(n) for n = 1..10000
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235620, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

Select[Prime@ Range@ 500, PrimeQ@ FromDigits[ IntegerDigits[#, 8], 9] &] (* Giovanni Resta, Sep 12 2019 *)

is(p,b=9,c=8)=isprime(vector(#d=digits(p,c),i,b^(#d-i))*d~)&&isprime(p) \\ Note: This code is only valid for b > c.

A231481 Primes whose base-6 representation is also the base-9 representation of a prime.

Original entry on oeis.org

2, 3, 5, 13, 17, 29, 59, 67, 71, 73, 97, 127, 191, 199, 223, 227, 239, 307, 337, 349, 353, 367, 409, 421, 433, 449, 461, 479, 487, 491, 563, 571, 577, 619, 647, 683, 739, 743, 811, 823, 829, 857, 881, 911, 937, 941, 991, 1021, 1051, 1091, 1103, 1117, 1163, 1201, 1217, 1259, 1277, 1289

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of a two-dimensional array of sequences, given in the LINK, based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			13 = 21_6 and 21_9 = 19 are both prime, so 13 is a term.

Giovanni Resta, Table of n, a(n) for n = 1..10000
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235639, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

Select[Prime[Range[300]],PrimeQ[FromDigits[IntegerDigits[#,6],9]]&] (* Harvey P. Dale, Aug 30 2015 *)

is(p,b=9,c=6)=isprime(vector(#d=digits(p,c),i,b^(#d-i))*d~)&&isprime(p) \\ Note: This code is only valid for b > c.

A235471 Primes whose base-8 representation also is the base-3 representation of a prime.

Original entry on oeis.org

2, 17, 73, 521, 577, 593, 1097, 1153, 4177, 8713, 33353, 33857, 37889, 41617, 65537, 65609, 69697, 70289, 70793, 74897, 262153, 262657, 266369, 331777, 331921, 336529, 336977, 529489, 533129, 533633, 590921, 594953, 598537, 2098241, 2101249, 2102417, 2134529

Offset: 1

M. F. Hasler, Jan 12 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.
For further motivation and cross-references, see sequence A235265 which is the main entry for this whole family of sequences.
Seems to be a subsequence of A066649 and A123364.
Since the trailing digit of the base 7 expansion must (like all others) be less than 3, this is a subsequence of A045381.

			E.g., 17 = 21_8 and 21_3 = 7 are both prime.

Alois P. Heinz, Table of n, a(n) for n = 1..10000
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A231478, A065720 ⊂ A036952, A065721 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235461 - A235482, A235615 - A235639. See the LINK for further cross-references.

b8b3pQ[n_]:=Module[{id8=IntegerDigits[n,8]},Max[id8]<3&&PrimeQ[ FromDigits[ id8,3]]]; Select[Prime[Range[160000]],b8b3pQ] (* Harvey P. Dale, Mar 16 2019 *)

is(p,b=3,c=8)=vecmax(d=digits(p,c))

forprime(p=1,1e3,is(p,8,3)&&print1(vector(#d=digits(p,3),i,8^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,3,8)

A235617 Primes whose base-7 representation also is the base-4 representation of a prime.

Original entry on oeis.org

2, 3, 17, 59, 71, 73, 113, 353, 367, 449, 463, 491, 701, 743, 757, 787, 857, 1039, 1151, 1193, 2411, 2423, 2467, 2551, 2843, 3109, 3137, 3209, 3251, 4817, 4903, 5209, 5657, 5839, 5939, 5953, 7211, 7603, 7703, 8009, 8039, 8291, 8387, 16831, 16871, 16927, 17207, 17321, 17837, 19211, 19267, 20261, 20287, 22123, 22303

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			E.g., 17 = 23_7 and 23_4 = 11 are both prime.

Robert Price, Table of n, a(n) for n = 1..8515
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235634, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

is(p,b=4,c=7)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,7,4)&&print1(vector(#d=digits(p,4),i,7^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,4,9)

A235618 Primes whose base-8 representation also is the base-4 representation of a prime.

Original entry on oeis.org

2, 3, 11, 19, 67, 89, 137, 211, 523, 593, 641, 659, 1097, 1163, 1627, 1667, 1747, 4177, 4673, 4691, 5323, 5657, 5659, 5779, 5827, 5849, 8209, 8387, 8779, 8849, 9227, 9241, 9283, 9433, 9803, 9817, 9859, 9883, 9929, 12289, 12377, 12433, 12491, 12953, 13003, 13331, 13339, 13441

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			E.g., 11 = 13_8 and 13_4 = 7 are both prime.

Robert Price, Table of n, a(n) for n = 1..1627
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A235633, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

is(p,b=4,c=8)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,8,4)&&print1(vector(#d=digits(p,4),i,8^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,4,9)

A235620 Primes whose base-9 representation also is the base-8 representation of a prime.

Original entry on oeis.org

2, 3, 5, 7, 19, 41, 59, 97, 109, 131, 151, 277, 331, 347, 457, 491, 541, 547, 577, 601, 739, 761, 811, 829, 977, 997, 1031, 1231, 1279, 1303, 1321, 1499, 1549, 1571, 1609, 1621, 1801, 1987, 2221, 2239, 2269, 2309, 2381, 2399, 2521, 2617, 2687, 2707, 2791, 2939, 2953, 3119

Offset: 1

M. F. Hasler, Jan 13 2014

This sequence is part of the two-dimensional array of sequences based on this same idea for any two different bases b, c > 1. Sequence A235265 and A235266 are the most elementary ones in this list. Sequences A089971, A089981 and A090707 through A090721, and sequences A065720 - A065727, follow the same idea with one base equal to 10.

			19 is a term: 19 = 21_9 and 21_8 = 17, also a prime.
79 is not a term: 79 = 87_9 and 87 is not a valid base-8 representation.

Alois P. Heinz, Table of n, a(n) for n = 1..10000
M. F. Hasler, Primes whose base c expansion is also the base b expansion of a prime

Cf. A231480, A235265, A235266, A152079, A235461 - A235482, A065720 - A065727, A235394, A235395, A089971 ⊂ A020449, A089981, A090707 - A091924, A235615 - A235639. See the LINK for further cross-references.

b9b8pQ[n_]:=Module[{id=IntegerDigits[n,9]},Max[id]<8&&PrimeQ[FromDigits[ id,8]]]; Select[Prime[Range[500]],b9b8pQ] (* Harvey P. Dale, Mar 12 2018 *)

is(p,b=8,c=9)=vecmax(d=digits(p,c))

forprime(p=1,3e3,is(p,9,8)&&print1(vector(#d=digits(p,8),i,9^(#d-i))*d~,",")) \\ To produce the terms, this is more efficient than to select them using straightforwardly is(.)=is(.,8,9)

isok(p) = isprime(p) && (q = digits(p, 9)) && (vecmax(q) < 8) && isprime(fromdigits(q, 8)); \\ Michel Marcus, Mar 12 2018

cp's OEIS Frontend

A235615 Primes whose base-5 representation also is the base-4 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

PARI

A235635 Primes whose base-5 representation is also the base-7 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

A235616 Primes whose base-6 representation also is the base-4 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

PARI

A235638 Primes whose base-8 representation also is the base-6 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

PARI

A231480 Primes whose base-8 representation is also the base-9 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

A231481 Primes whose base-6 representation is also the base-9 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

A235471 Primes whose base-8 representation also is the base-3 representation of a prime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

PARI

A235617 Primes whose base-7 representation also is the base-4 representation of a prime.