|
| |
|
|
A100688
|
|
p * 3^p - 1 where p is prime.
|
|
0
| |
|
|
17, 80, 1214, 15308, 1948616, 20726198, 2195382770, 22082967872, 2165293113020, 1990280943581606, 19147875284802356, 16660504517966902430, 1495392851464002242522, 14115049597965094337960
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 2*3^2 - 1 = 17
|
|
|
MATHEMATICA
| Do[Print[Prime[n]*3^(Prime[n]) - 1], {n, 1, 20}] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Feb 15 2006
# 3^#-1&/@Prime[Range[20]] (* From Harvey P. Dale, Jan 24 2012 *)
|
|
|
CROSSREFS
| Sequence in context: A142021 A172045 A060934 * A044204 A044585 A197397
Adjacent sequences: A100685 A100686 A100687 * A100689 A100690 A100691
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Parthasarathy Nambi (PachaNambi(AT)yahoo.com), Dec 07 2004
|
|
|
EXTENSIONS
| More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Feb 15 2006
|
| |
|
|