This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A089788 #7 Nov 18 2018 00:47:18
%S A089788 73,6113,193,293,373,433,26317,613,94153,38917,2237,1013,43313,76123,
%T A089788 82723,76919,70117,169943,1733,4337,1933,1993,421189,2293,2393,195131,
%U A089788 2633,2713,86311,510179,94111,97711,3373,129113,3593,3733,3833,268729
%N A089788 Primes of the form prime(nk) followed by prime(k).
%t A089788 c[r_, s_] := ToExpression[ToString[r] <> ToString[s]]; Do[k = 1; While[ !PrimeQ[c[Prime[n*k], Prime[k]]], k++ ]; Print[c[Prime[n*k], Prime[k]]], {n, 2, 100}] (* _Ryan Propper_, Sep 14 2005 *)
%Y A089788 Cf. A089782, A089783, A089784, A089785, A089786, A089787, A089789.
%K A089788 base,nonn
%O A089788 1,1
%A A089788 _Amarnath Murthy_, Nov 24 2003
%E A089788 More terms from _Ryan Propper_, Sep 14 2005