A072805 Primes of form 4k+3 written in base 3.
10, 21, 102, 201, 212, 1011, 1121, 1202, 2012, 2111, 2122, 2221, 10002, 10211, 10222, 11201, 11212, 12011, 12121, 20001, 20012, 20122, 21002, 21101, 21211, 22021, 22102, 22212, 100022, 100202, 101001, 101111, 102101, 102112, 110021
Offset: 1
Examples
83 ~ 10002 in base 3.
Programs
-
Mathematica
Do[s=Prime[n]; If[Mod[s, 4]==3, Print[BaseForm[s, 3]]], {n, 1, 256}]