|
| |
|
|
A065003
|
|
Not McNugget numbers.
|
|
3
|
|
|
|
1, 2, 3, 4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 22, 23, 25, 28, 31, 34, 37, 43
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
A McNugget number has the form 6x + 9y + 20z for nonnegative integers x, y, z.
A214772(a(n)) = 0. - Reinhard Zumkeller, Jul 28 2012
|
|
|
REFERENCES
|
Eric Weisstein, Concise Encyclopedia of Mathematics, p. 1151.
|
|
|
LINKS
|
Table of n, a(n) for n=1..22.
James Grime and Brady Haran, How to order 43 Chicken McNuggets, 2012.
Eric Weisstein's World of Mathematics, McNugget Numbers.
Wikipedia, Coin problem
|
|
|
MATHEMATICA
|
Select[Range[43], Length@FrobeniusSolve[{6, 9, 20}, #] == 0 &] (* Arkadiusz Wesolowski, Feb 20 2013 *)
|
|
|
PROG
|
(Haskell)
import Data.List (elemIndices)
a065003 n = a065003_list !! n
a065003_list = elemIndices 0 $ map a214772 [0..43]
-- Reinhard Zumkeller, Jul 28 2012
(PARI) is(n)=forstep(k=n, 6, -20, if(k%3==0, return(0))); n%20>0 \\ Charles R Greathouse IV, May 05 2013
|
|
|
CROSSREFS
|
Cf. A214777 (complement).
Sequence in context: A037014 A225061 A133223 * A189729 A056177 A025199
Adjacent sequences: A065000 A065001 A065002 * A065004 A065005 A065006
|
|
|
KEYWORD
|
easy,fini,full,nonn
|
|
|
AUTHOR
|
Karl Sabbagh (karl.sabbagh(AT)btinternet.com), Nov 01 2001
|
|
|
STATUS
|
approved
|
| |
|
|
