OFFSET
1,1
COMMENTS
Sequence is simply visual coexistence of two core and nice sequences. - Altug Alkan, Sep 28 2015
MATHEMATICA
t = Select[Range@ 10000, PrimeOmega@ # == 2 &]; Table[FromDigits@ Join[IntegerDigits@ Prime@ n, IntegerDigits@ t[[n]]], {n, 50}] (* Michael De Vlieger, Sep 22 2015 *)
PROG
(PARI) m=0; for (n=1, 250, if (bigomega(n) == 2, m++; print1(Str(prime(m), n), ", "))) \\ Altug Alkan, Sep 23 2015
(Perl) use ntheory ":all"; my $i=0; forprimes { print ++$i, " $_", nth_semiprime($i), "\n"; } 100; # Dana Jacobsen, Oct 11 2018
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Giovanni Teofilatto, Sep 22 2015
STATUS
approved