

A171945


Ppositions for game of misere version of Mark.


3



1, 4, 6, 10, 14, 16, 18, 22, 24, 26, 30, 34, 38, 40, 42, 46, 50, 54, 56, 58, 62, 64, 66, 70, 72, 74, 78, 82, 86, 88, 90, 94, 96, 98, 102, 104, 106, 110, 114, 118, 120, 122, 126, 130, 134, 136, 138, 142, 146, 150, 152, 154, 158, 160, 162, 166, 168, 170, 174
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

The same as A036554 except for the replacement of dopey by vile powers of 2.  Aviezri Fraenkel, Apr 28 2011


LINKS

Table of n, a(n) for n=1..59.
Aviezri S. Fraenkel, The vile, dopey, evil and odious game players, Discrete Math. 312 (1) (2012) 4246.


MAPLE

isA171944 := proc(n)
option remember;
if n =0 or n =2 then
true;
elif isA171945(n) then
false;
else
true ;
end if;
end proc:
isA171945 := proc(n)
option remember;
if n = 0 or n =2 then
false ;
elif n = 1 then
true;
elif n mod 2 <> 0 then
return false;
elif isA171944(n/2) then
true;
else
false ;
end if;
end proc:
for n from 0 to 400 do
if isA171945(n) then
printf("%d, ", n);
end if;
end do: # R. J. Mathar, Mar 28 2013


MATHEMATICA

lim = 210; S = {1}; A = {};
Do[d = Divisors[n]; If[Complement[d, S] != {n}, A = Append[A, n]; S = Union[S, d]], {n, 1, lim}];
A (* JeanFrançois Alcover, Jul 11 2019, after Peter Luschny in A171944 *)


CROSSREFS

Complement of A171944. Also for n>1, twice A171944. Cf. A036554.
Sequence in context: A110507 A224467 A134624 * A310583 A298784 A241975
Adjacent sequences: A171942 A171943 A171944 * A171946 A171947 A171948


KEYWORD

nonn,easy


AUTHOR

N. J. A. Sloane, Oct 29 2010


STATUS

approved



