## Not run:
#
# #Create a pointer to the table IRIS
# idf<-ida.data.frame('IRIS')
#
# #Add a column
# idf$SepalLengthg4 <- ifelse(idf$SepalLength>4,'t','f')
#
# #Calculate the cross-table between Species and SepalLengthg4
# idaTable(idf[,c('Species','SepalLengthg4')])
#
# ## End(Not run)
Run the code above in your browser using DataLab