# Create a test array:
a <- scidb("apply(build(<x:int64>[i=0:0,1,0],2),m,12,n,18,k,17)")
scidb_fisher.test(a)[]
# output looks like:
# x m n k pval estimate
# 0 2 12 18 17 0.0005367241 0.04693664Run the code above in your browser using DataLab