export(pB,EEB)
importFrom("stats", "pt", "qt")