McNuggets problem: Difference between revisions
m
→{{header|R}}
ReeceGoding (talk | contribs) m (→{{header|R}}) |
ReeceGoding (talk | contribs) m (→{{header|R}}) |
||
Line 1,292:
<lang r>results<-setdiff(0:100,mcNuggets)
cat("The non-McNuggets numbers that are no greater than 100 are:",results,"\nThe largest is",max(results),"\n")</lang>
<lang r>
max(setdiff(0:100,rowSums(expand.grid(seq(0,100,6),seq(0,100,9),seq(0,100,20)))))</lang>
{{output}}
| |||