You can delete or add any number of options
f[x_, op__] := Graphics3D[{Red, Line[{{0, 0, 0}, {Re[(-1)^x], Im[(-1)^x], 0}}]}, op] Manipulate[ f[a, Axes -> True, Boxed -> False, BoxRatios -> {1, 1, 1}, AxesOrigin -> {0, 0, 0}], {a, 0, 1}]
