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 A114873 #6 Oct 31 2013 12:17:37 %S A114873 1,8,10,12,20,22,28,30,32,36,40,46,52,54,58,60,64,66,70,72,78,82,88, %T A114873 96,102,106,108,110,112,126,128,130,136,138,148,150,166,172,178,180, %U A114873 190,192,196,198,210,222,226,228,232,238,240,250,262,268,270,272,276,280 %N A114873 Numbers representable in exactly one way as (p-1)p^k (where p is a prime and k>=0), in ascending order. %e A114873 (2-1)*2^3 is the only representation of 8 in the required form. %t A114873 s = Split@ Sort@ Flatten@ Table[(Prime[n] - 1)Prime[n]^k, {n, 60}, {k, 0, 6}]; Take[Union@ Flatten@ Select[s, Length@# == 1 &], 80] (* _Robert G. Wilson v_ *) %Y A114873 Cf. A114871, A114874. %K A114873 nonn %O A114873 1,2 %A A114873 _Franz Vrabec_, Jan 03 2006 %E A114873 More terms from _Robert G. Wilson v_, Jan 05 2006