login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A083991
Members of A083989 whose 10's complement is also a member of A083989.
2
3, 7, 17, 29, 71, 83, 281, 719, 983, 997, 1637, 2309, 3701, 4493, 5507, 6299, 7691, 8363, 9161, 9803, 11003, 13163, 17117, 18371, 20807, 31181, 31793, 32693, 32843, 33617, 33893, 34211, 34673, 37277, 38453, 49409, 50591, 61547, 62723, 65327
OFFSET
1,1
LINKS
EXAMPLE
Leading zeros are removed before concatenation: 997 is in here because 997 is in A083989 (9973 is prime) and its 10-complement 3 is also in A083989 (37 is prime). Unlike the example of 17 and 83, the 10-complement is not a 1-to-1 relation in cases where 9 shows up as a most significant digit.
17 and 83 both are members and are each other's 10's complement.
MAPLE
A055120 := proc(n) local digs ; digs := ilog10(n)+1 ; 10^digs-n ; end: isA083989 := proc(n) local comp, ccat ; if isprime(n) then comp := A055120(n) ; ccat := n*10^(ilog10(comp)+1)+comp ; RETURN( isprime(ccat)) ; else false ; fi ; end: isA083991 := proc(n) local comp; if isA083989(n) then comp := A055120(n) ; RETURN( isA083989(comp) ) ; else false ; fi ; end: for n from 1 to 80000 do if isA083991(n) then printf("%d, ", n) ; fi ; od ; # R. J. Mathar, Jul 18 2007
CROSSREFS
Sequence in context: A106968 A191081 A079779 * A372082 A228567 A123988
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, May 23 2003
EXTENSIONS
More terms from Diana L. Mecum and R. J. Mathar, Jul 18 2007
STATUS
approved