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 A083979 #14 May 11 2022 15:14:50 %S A083979 181,18181,78887,1880881,9888889,188868881,188888881,18888588881, %T A083979 1488888888841,7888886888887,3888888888883,188888858888881, %U A083979 188888888888881,38888888088888883,1688888888888888861,3888888882888888883,128888888888888888821 %N A083979 Smallest palindromic prime containing exactly n 8's. %H A083979 Chai Wah Wu, <a href="/A083979/b083979.txt">Table of n, a(n) for n = 1..500</a> %t A083979 Table[d = 8; i = 1; %t A083979 While[ x = IntegerDigits[Prime[i]]; %t A083979 x != Reverse[x] || Count[x, d] != n , i++]; %t A083979 FromDigits[x], {n, 1, 5}] (* _Robert Price_, Mar 25 2019 *) %t A083979 Module[{prs=Select[Prime[Range[105*10^5]],PalindromeQ]},Table[ SelectFirst[ prs,DigitCount[ #,10,8]==n&],{n,6}]] (* The program generates the first 6 terms of the sequence. *) (* _Harvey P. Dale_, May 11 2022 *) %Y A083979 Cf. A083972, A083973, A083974, A083975, A083976, A083977, A083978, A083980, A083981. %K A083979 base,nonn %O A083979 1,1 %A A083979 _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 21 2003 %E A083979 Corrected and extended by _Giovanni Resta_, Feb 08 2006