Plot[MathieuCharacteristicB[1, q], {q, -5, 5}]