1,1

a(n) = Min{p prime: LevenshteinDistance(p, A000040(n))=1};

except for n=1 and n=5: a(n) < A000040(n);

a(n) < A097722(n).

Table of n, a(n) for n=1..75.

Michael Gilleland, Levenshtein Distance [It has been suggested that this algorithm gives incorrect results sometimes. - N. J. A. Sloane]

Cf. A097720.

Sequence in context: A202538 A239736 A065437 * A073756 A328829 A006379

Adjacent sequences: A097718 A097719 A097720 * A097722 A097723 A097724

nonn,base

Reinhard Zumkeller, Aug 23 2004

approved