R：交互式t.test函数

我不得不教我的朋友如何在R上运行t-test（使用

t.test

函数），我只希望函数更具交互性。新来者可以轻松地运行该函数，如果该函数指导他们完成测试。我在网上找不到这样的功能，所以我决定自己做一个。尝试制作一个互动功能对我来说是一个巨大的挑战，但它是我研究生生活中一个有趣的喘息时间

我希望我的函数能够像

myttest（x，y，paired=T）

那样运行，以便Rmarkdown可以正常生成输出。我还希望通过键入

myttest（）

以交互方式运行该函数。因此，我决定将我的函数基于

t.test.default

，并在需要的地方在源代码中添加

readline

我使用了

getAnywhere（t.test.default）

函数来显示源代码。我把下面的代码放在第一个

{

后面，这样R就可以请求一个向量，比如

data$GPA

if (missing(x)) {x <- readline("What is the name of the data set?")}

数据集

data

实际上存在于全球环境中，它有一列

GPA

，因此我认为这是我编码的问题。为什么R不读取

GPA

列中的观察值

（另外，我的最终目标之一是让R只要求一个数据集。R将读取数据集的列，在交互式对话中显示它们，并询问

您希望使用哪个变量作为DV？

。然后我可以输入GPA。例如，我还认为如果R在开始时要求t测试的类型（例如，一个样本、两个样本或成对样本）。您认为这一级别的交互是可能的吗？）

Error in myttest() : not enough 'x' observations
In addition: Warning message:
In myttest() : NAs introduced by coercion