## Not run:
# # 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.04693664
#
# ## End(Not run)
Run the code above in your browser using DataLab