\begin{Schunk}
\begin{Sinput}
 predictOMatic(bushideoglm3, predVals = list(ideoln=1:7, partyid = c("I", "D", "R")))
\end{Sinput}
\begin{Soutput}
   ideoln partyid        fit
1       1       I 0.13477628
2       2       I 0.23329473
3       3       I 0.37279895
4       4       I 0.53726680
5       5       I 0.69400623
6       6       I 0.81585125
7       7       I 0.89641958
8       1       D 0.01172205
9       2       D 0.02264480
10      3       D 0.04329955
11      4       D 0.08122814
12      5       D 0.14726640
13      6       D 0.25225303
14      7       D 0.39722049
15      1       R 0.50156082
16      2       R 0.66280408
17      3       R 0.79337450
18      4       R 0.88235879
19      5       R 0.93610768
20      6       R 0.96623895
21      7       R 0.98242723
\end{Soutput}
\end{Schunk}
