# [seqfan] How to respond to a message?

Harry J. Smith hjsmithh at sbcglobal.net
Mon Jan 12 01:12:10 CET 2009

```I would like to respond to a message I found at
http://list.seqfan.eu/pipermail/seqfan/2009-January/000494.html but I don't
know how. I will do it here:

There is more wrong with the b-file than a(1)=6661 being missing. All terms
starting with 666 like a(6) = 66601 are also missing. I will send Neil a
corrected b-file for n=1,.,20000 (1 6661 . 20000 68466659).

I used this PARI program to generate it:

digitsIn(x) = 1 + log(x)\log(10)

{

allocatemem(932245000);

default(primelimit, 4294965247);

m=1;

forprime (p=6660, 68466670,

d=digitsIn(p);

for (i=1, d-3,

t=10^i;

u=p\t;

x=u-(u\1000)*1000;

if (x==666, print(m, " ", p); write("b131645.txt", m, " ", p); m=m+1;
break;);

)

)

}

[seqfan] Re: b-file mismatch A131645

zak seidov zakseidov at yahoo.com
<mailto:seqfan%40list.seqfan.eu?Subject=%5Bseqfan%5D%20Re%3A%20b-file%20mism
v.nl>
Fri Jan 9 17:52:33 CET 2009

*	Previous message: [seqfan]
<http://list.seqfan.eu/pipermail/seqfan/2009-January/000488.html>  b-file
mismatch A131645
*	Next message: [seqfan]
<http://list.seqfan.eu/pipermail/seqfan/2009-January/000489.html>  Re: Ugly
digit sum (no more typos ?)
*	Messages sorted by: [
<http://list.seqfan.eu/pipermail/seqfan/2009-January/date.html#494>  date ]
<http://list.seqfan.eu/pipermail/seqfan/2009-January/subject.html#494>
subject ] [
<http://list.seqfan.eu/pipermail/seqfan/2009-January/author.html#494>
author ]

_____

Also, Mmca code may be made shorter (and faster):

%t A131645 Select[Prime[Range[300000]],!StringFreeQ[ToString[#],"666"]&]

--- On Fri, 1/9/09, Richard Mathar <mathar
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan>  at
strw.leidenuniv.nl

> wrote:

<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > From: Richard
Mathar <mathar at strw.leidenuniv.nl>
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > Subject: [seqfan]
b-file mismatch A131645
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > To: seqfan at
seqfan.eu
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > Date: Friday,
January 9, 2009, 9:54 AM
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > The value
a(1)=6661 in A131645 is obviously missing in the
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > associated b-file
b131645.txt. Can anyone submit a
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > corrected
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> > b-file?
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> >
<http://list.seqfan.eu/cgi-bin/mailman/listinfo/seqfan> >
http://www.research.att.com/~njas/sequences/A131645
<http://www.research.att.com/~njas/sequences/A131645> >
<http://www.research.att.com/~njas/sequences/A131645> > Richard J. Mathar
<http://www.research.att.com/~njas/sequences/A131645> >
<http://www.research.att.com/~njas/sequences/A131645> >
<http://www.research.att.com/~njas/sequences/A131645> >
_______________________________________________
<http://www.research.att.com/~njas/sequences/A131645> >
<http://www.research.att.com/~njas/sequences/A131645> > Seqfan Mailing list
- http://list.seqfan.eu/

<http://list.seqfan.eu/> -Harry

```