%I A100110
%S A100110 2,3,5,7,11,13,17,19,23,29,32,33,35,37,41,43,47,49,53,59,52,53,55,57,61,
%T A100110 63,67,69,73,79,72,73,75,77,81,83,87,89,93,99,112,113,115,117,121,123,
%U A100110 127,129,133,139,132,133,135,137,141,143,147,149,153,159,172,173,175
%N A100110 Write n in decimal and replace each digit d by prime(d+1).
%e A100110 E.g. 11 -> prime(2)prime(2) = 33.
%t A100110 Table[FromDigits[Prime[(IntegerDigits[n] + 1)]], {n, 0, 70}] - Stefan
Steinerberger (stefan.steinerberger(AT)gmail.com), Mar 27 2006
%Y A100110 Sequence in context: A002267 A051750 A100724 this_sequence A095323 A100370
A095319
%Y A100110 Adjacent sequences: A100107 A100108 A100109 this_sequence A100111 A100112
A100113
%K A100110 nonn,base,easy
%O A100110 0,1
%A A100110 Jorge Coveiro (jorgecoveiro(AT)yahoo.com), Dec 26 2004
%E A100110 More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com),
Mar 27 2006
|