A123211 Terms in A006512 containing the digit "6" at least once, such that changing every "6" to a "9" and vice versa yields a larger term in A006512.

1063, 3361, 7561, 10861, 14563, 16141, 16693, 26881, 32611, 36343, 55633, 61153, 62971, 62983, 64153, 68713, 70621, 76963, 100363, 106453, 115603, 116101, 131641, 136993, 146521, 152641, 155863, 160711, 161341, 161971, 166741, 167341, 167863

Offset

1,1

Comments

1063 is in A006512 and so is 1093, obviously 1093 > 1063, therefore 1063 is in the sequence.

If the definition of the permitted terms included any term in A006512, instead of a larger term, the sequence would also contain 19963, 79693, 92671, 92683, and 139663. - James C. McMahon, Nov 17 2024

Links

Table of n, a(n) for n=1..33.

Mathematica

gtp=Select[Prime[Range[PrimePi[400000]]], PrimeQ[#-2]&]; Select[gtp, MemberQ[IntegerDigits[#], 6]&&MemberQ[gtp, r=FromDigits[IntegerDigits[#]/.{6->9, 9->6}]]&&r>#&] (* James C. McMahon, Nov 17 2024 *)

Crossrefs

Cf. A006512.

Sequence in context: A177136 A080334 A224457 * A023078 A056102 A218564

Adjacent sequences: A123208 A123209 A123210 * A123212 A123213 A123214

Keyword

base,nonn,less

Author

Pierre CAMI, Oct 05 2006

Extensions

Edited, corrected and extended by Pierre CAMI and Stefan Steinerberger, Aug 14 2007

Status

approved