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 A295640 #18 Dec 27 2017 03:17:47 %S A295640 2,4,2,18,12,4,12,24,26,18,42,28,2,16,18,34,92,4,12,46,26,16,6,36,26, %T A295640 16,6,16,152,18,42,136,6,162,132,58,24,142,48,22,56,16,36,84,2,12,24, %U A295640 108,168,4,12,214,36,114,12,444,26,54,416,42 %N A295640 Smallest k not divisible by 5 such that k*5^n + 1 is prime. %C A295640 The ratio (Sum_(n=1..t) a(n)) / (Sum_(n=1..t) n) tends to log(5) as t increases. %H A295640 Pierre CAMI, <a href="/A295640/b295640.txt">Table of n, a(n) for n = 1..2999</a> %t A295640 Array[Block[{k = 2}, While[Or[Divisible[k, 5], ! PrimeQ[k 5^# + 1]], k++]; k] &, 60] (* _Michael De Vlieger_, Dec 18 2017 *) %o A295640 (PARI) a(n) = {k = 1; while (!isprime(k*5^n+1), k++; if (!(k%5), k++)); k;} \\ _Michel Marcus_, Nov 25 2017 %Y A295640 Cf. A057778, A295639, A295641. %K A295640 nonn %O A295640 1,1 %A A295640 _Pierre CAMI_, Nov 25 2017