-- -*- M2-comint -*- hash: 9966625618476178181

i1 : dataFrame = RFunction "data.frame"

o1 = dataFrame

o1 : RFunction

i2 : chisqTest = RFunction "chisq.test"

o2 = chisqTest

o2 : RFunction

i3 : M = dataFrame(F => {762, 327, 468}, M => {484, 239, 477},
         "row.names" => {"Democrat", "Independent", "Republican"})

o3 =               F   M
     Democrat    762 484
     Independent 327 239
     Republican  468 477

o3 : RObject of type list

i4 : chisqTest M

o4 = 
             Pearson's Chi-squared test

     data:  structure(list(F = c(762L, 327L, 468L), M = c(484L, 239L, 477L)), class = "data.frame", row.names = c("Democrat", "Independent", "Republican"))
     X-squared = 30.07, df = 2, p-value = 2.954e-07


o4 : RObject of type list

i5 : value oo_"p.value"

o5 = 2.953589183211757e-7

o5 : RR (of precision 53)

i6 : 
