login

Revision History for A222235

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
In the number n, replace all (decimal) digits '3' with '5' and vice versa.
(history; published version)
#11 by Jon E. Schoenfield at Fri Mar 31 00:20:14 EDT 2017
STATUS

editing

approved

#10 by Jon E. Schoenfield at Fri Mar 31 00:20:11 EDT 2017
NAME

In the number n, replace all (decimal) digits '3' by with '5' and vice versa.

STATUS

approved

editing

#9 by Bruno Berselli at Wed Jul 31 06:02:57 EDT 2013
STATUS

reviewed

approved

#8 by Bruno Berselli at Wed Jul 31 03:09:04 EDT 2013
STATUS

proposed

reviewed

#7 by Vincenzo Librandi at Tue Jul 30 14:42:49 EDT 2013
STATUS

editing

proposed

#6 by Vincenzo Librandi at Tue Jul 30 14:42:32 EDT 2013
LINKS

Vincenzo Librandi, <a href="/A222235/b222235.txt">Table of n, a(n) for n = 0..1000</a>

MATHEMATICA

a[n_]:= IntegerDigits[n]/.{3->5, 5->3} // FromDigits; Table[a[n], {n, 0, 80}] (* Vincenzo Librandi, Jul 30 2013 *)

STATUS

approved

editing

#5 by Charles R Greathouse IV at Tue Jul 16 11:45:02 EDT 2013
STATUS

editing

approved

#4 by Charles R Greathouse IV at Tue Jul 16 11:44:58 EDT 2013
KEYWORD

nonn,base,easy

STATUS

approved

editing

#3 by M. F. Hasler at Wed Feb 13 00:56:07 EST 2013
STATUS

editing

approved

#2 by M. F. Hasler at Tue Feb 12 23:51:32 EST 2013
NAME

allocated for M. F. Hasler

In the number n, replace all (decimal) digits '3' by '5' and vice versa.

DATA

0, 1, 2, 5, 4, 3, 6, 7, 8, 9, 10, 11, 12, 15, 14, 13, 16, 17, 18, 19, 20, 21, 22, 25, 24, 23, 26, 27, 28, 29, 50, 51, 52, 55, 54, 53, 56, 57, 58, 59, 40, 41, 42, 45, 44, 43, 46, 47, 48, 49, 30, 31, 32, 35, 34, 33, 36, 37, 38, 39, 60, 61, 62, 65, 64, 63, 66, 67, 68, 69, 70, 71, 72, 75, 74, 73

OFFSET

0,3

COMMENTS

The map which is applied to primes in A171026.

PROG

(PARI) A222235(n, d=[0, 1, 2, 5, 4, 3, 6, 7, 8, 9])={sum(i=1, #n=digits(n), d[n[i]+1]*10^(#n-i), !n*d[1])} \\ N.B.: digits(0)=[] in PARI (v.2.6)

KEYWORD

allocated

nonn,base,changed

AUTHOR

M. F. Hasler, Feb 12 2013

STATUS

approved

editing