|
| |
|
|
A062009
|
|
Floor of Sum{k=1...n} sqrt(prime(k)).
|
|
2
| |
|
|
1, 3, 5, 8, 11, 14, 19, 23, 28, 33, 39, 45, 51, 58, 65, 72, 80, 87, 96, 104, 113, 121, 131, 140, 150, 160, 170, 180, 191, 201, 213, 224, 236, 248, 260, 272, 285, 297, 310, 323, 337, 350, 364, 378, 392, 406, 421, 436, 451, 466, 481, 497, 512, 528, 544, 560, 577
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
MAPLE
| P:=proc(n) local k, i; for i from 1 by 1 to n do print(trunc(sum('evalf(sqrt(ithprime(k)), 50)', 'k'=1..i))); od; end: P(101); - Paolo P. Lava (paoloplava(AT)gmail.com), Feb 05 2008
|
|
|
PROG
| (PARI) { default(realprecision, 100); for (n=1, 1000, write("b062009.txt", n, " ", floor(sum(k=1, n, sqrt(prime(k))))) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 29 2009]
|
|
|
CROSSREFS
| Cf. A062048.
Sequence in context: A005356 A060432 A156023 * A062484 A022433 A081401
Adjacent sequences: A062006 A062007 A062008 * A062010 A062011 A062012
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Jun 27 2001
|
|
|
EXTENSIONS
| Description corrected by Dean Hickerson (dean.hickerson(AT)yahoo.com), Jun 30, 2001
|
| |
|
|
