|
|
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.
|
|
REFERENCES
|
Eric Weisstein, Concise Encyclopedia of Mathematics, p. 1151.
|
|
LINKS
|
C. U. Jensen and A. Thorup, Gorenstein orders, Journal of Pure and Applied Algebra, Volume 219, Issue 3, March 2015, Pages 551-562. See Example 7.1. - N. J. A. Sloane, Jul 22 2014
|
|
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]
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,fini,full,nonn
|
|
AUTHOR
|
Karl Sabbagh (karl.sabbagh(AT)btinternet.com), Nov 01 2001
|
|
STATUS
|
approved
|
|
|
|