User interface R GUI是否有助于功率计算/分析？_User Interface_R

User interface R GUI是否有助于功率计算/分析？

user-interface r

User interface R GUI是否有助于功率计算/分析？,user-interface,r,User Interface,R,我遇到了几个熟悉SPSS的人，他们不愿意涉入R，但可能会因为GUI的舒适而被鼓励这样做。是否有任何GUI支持功率计算？我搜索了大约15分钟，没有找到任何东西告诉我他们可以。您知道吗？当它以数据挖掘任务为目标时，您可以看看（请参阅相关文档）。我不确定它是否支持功耗计算，但它更倾向于用户友好的GUI。当它针对数据挖掘任务时，您可以看看（请参阅相关的）。我不确定它是否支持功耗计算，但它更倾向于用户友好的GUI。将许多软件包包装在易于使用的GUI界面中。如果您正在寻找未包含的特定软件包，请向开发人员发送

我遇到了几个熟悉SPSS的人，他们不愿意涉入R，但可能会因为GUI的舒适而被鼓励这样做。是否有任何GUI支持功率计算？我搜索了大约15分钟，没有找到任何东西告诉我他们可以。您知道吗？

当它以数据挖掘任务为目标时，您可以看看（请参阅相关文档）。我不确定它是否支持功耗计算，但它更倾向于用户友好的GUI。

当它针对数据挖掘任务时，您可以看看（请参阅相关的）。我不确定它是否支持功耗计算，但它更倾向于用户友好的GUI。

将许多软件包包装在易于使用的GUI界面中。如果您正在寻找未包含的特定软件包，请向开发人员发送电子邮件，他们会很高兴添加它，通常在几天内即可添加。

Red-R是R的可视化编程界面，旨在将R统计环境的强大功能带给普通研究人员或用户。这个项目的目标是在没有任何编程专业知识的情况下提供对R中大量软件包库的访问。Red-R框架使用数据流编程的概念，使数据成为关注的中心，同时隐藏所有编程复杂性。在可视化编程中，功能工具（在Red-R中称为小部件）在画布上链接在一起，以控制通过程序的数据流。此框架允许新手用户快速轻松地构建复杂的分析管道

这里有几个视频演示了应用程序

当前的一些功能包括：

读取/查看数据
合并/相交/筛选
数学/应用
策划
统计-参数化
统计信息-非参数

一些高级功能：

生物导体微阵列分析
生存分析
空间统计
SQLite
ROCR–ROC曲线
神经网络
LME4

这肯定是一项正在进行的工作，但是您可以在Red-R.org上查看该应用程序

我们正在寻找任何关于提高可用性和扩展功能的反馈。我们很乐意与任何有特殊需要的人合作。

Anup

Red-R是R的可视化编程界面，旨在将R统计环境的力量带给普通研究人员或用户。这个项目的目标是在没有任何编程专业知识的情况下提供对R中大量软件包库的访问。Red-R框架使用数据流编程的概念，使数据成为关注的中心，同时隐藏所有编程复杂性。在可视化编程中，功能工具（在Red-R中称为小部件）在画布上链接在一起，以控制通过程序的数据流。此框架允许新手用户快速轻松地构建复杂的分析管道

这里有几个视频演示了应用程序

当前的一些功能包括：

读取/查看数据
合并/相交/筛选
数学/应用
策划
统计-参数化
统计信息-非参数

一些高级功能：

生物导体微阵列分析
生存分析
空间统计
SQLite
ROCR–ROC曲线
神经网络
LME4

这肯定是一项正在进行的工作，但是您可以在Red-R.org上查看该应用程序

我们正在寻找任何关于提高可用性和扩展功能的反馈。我们很乐意与任何有特殊需要的人合作。

Anup我不知道，但向其中一些添加功能相当容易。例如，下面是配对/一个样本/两个样本t检验的推断器（）的简单幂分析对话框。有关在推断器中创建对话框的详细信息，请参阅

如果他们来自SPSS，他们应该会觉得与Devertier一起工作很舒服

dialog <- new(SimpleRDialog)
dialog$setSize(400L,600L)
dialog$setTitle("t-test power analysis")

#type of test
test<- new(ComboBoxWidget,"type of test",c("two.sample", "one.sample", "paired"))
test$setDefaultModel("two.sample")
addComponent(dialog, test,100,900,200, 100)

#Sample size
ss <- new(TextAreaWidget,"Sample size")
addComponent(dialog, ss,210,700,310, 300)

#sig
sig <- new(TextAreaWidget,"significance level")
sig$setDefaultModel("0.05")
addComponent(dialog, sig,320,700,420, 300)

#power
pow <- new(TextAreaWidget,"Power")
pow$setDefaultModel("0.80")
addComponent(dialog, pow,430,700,530, 300)

#effect size
eff <- new(TextAreaWidget,"Cohens D")
eff$setDefaultModel(".5")
addComponent(dialog, eff,540,700,640, 300)


#alternative
test<- new(ComboBoxWidget,"alternative",c("two.sided", "less","greater"))
test$setDefaultModel("two.sided")
addComponent(dialog, test,650,900,750, 100)


runDialog <- function(state){
    #print(state)
    cmd <- "require(pwr)\npwr.t.test("

    if(state[['Sample size']] == "")
        parameter <- "n=NULL"
    else
        parameter = paste("n=",state[['Sample size']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['significance level']] == "")
        parameter <- ",sig.level=NULL"
    else
        parameter = paste(",sig.level=",state[['significance level']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['Power']] == "")
        parameter <- ",power=NULL"
    else
        parameter = paste(",power=",state[['Power']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['Cohens D']] == "")
        parameter <- ",d=NULL"
    else
        parameter = paste(",d=",state[['Cohens D']],sep="")
    cmd <- paste(cmd,parameter);

    parameter = paste(",alternative='",state[['alternative']],"'",sep="")
    cmd <- paste(cmd,parameter);

    parameter = paste(",type='",state[['type of test']],"')",sep="")
    cmd <- paste(cmd,parameter);

    execute(cmd)
}

dialog$setRunFunction(toJava(runDialog))

deducer.addMenu("Power")
deducer.addMenuItem("t-test power",,"dialog$run()","Power")
if(.windowsGUI){
    winMenuAdd("Power")
    winMenuAddItem("Power", "t-test", "deducer('t-test power')")
}else if(.jgr){
    jgr.addMenu("Power")
    jgr.addMenuItem("Power", "t-test", "deducer('t-test power')")
}

dialog据我所知，这并不是什么问题，但向其中许多应用程序添加功能相当容易。例如，下面是配对/一个样本/两个样本t检验的推断器（）的简单幂分析对话框。有关在推断器中创建对话框的详细信息，请参阅
如果他们来自SPSS，他们应该会觉得与Devertier一起工作很舒服
dialog <- new(SimpleRDialog)
dialog$setSize(400L,600L)
dialog$setTitle("t-test power analysis")

#type of test
test<- new(ComboBoxWidget,"type of test",c("two.sample", "one.sample", "paired"))
test$setDefaultModel("two.sample")
addComponent(dialog, test,100,900,200, 100)

#Sample size
ss <- new(TextAreaWidget,"Sample size")
addComponent(dialog, ss,210,700,310, 300)

#sig
sig <- new(TextAreaWidget,"significance level")
sig$setDefaultModel("0.05")
addComponent(dialog, sig,320,700,420, 300)

#power
pow <- new(TextAreaWidget,"Power")
pow$setDefaultModel("0.80")
addComponent(dialog, pow,430,700,530, 300)

#effect size
eff <- new(TextAreaWidget,"Cohens D")
eff$setDefaultModel(".5")
addComponent(dialog, eff,540,700,640, 300)


#alternative
test<- new(ComboBoxWidget,"alternative",c("two.sided", "less","greater"))
test$setDefaultModel("two.sided")
addComponent(dialog, test,650,900,750, 100)


runDialog <- function(state){
    #print(state)
    cmd <- "require(pwr)\npwr.t.test("

    if(state[['Sample size']] == "")
        parameter <- "n=NULL"
    else
        parameter = paste("n=",state[['Sample size']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['significance level']] == "")
        parameter <- ",sig.level=NULL"
    else
        parameter = paste(",sig.level=",state[['significance level']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['Power']] == "")
        parameter <- ",power=NULL"
    else
        parameter = paste(",power=",state[['Power']],sep="")
    cmd <- paste(cmd,parameter);

    if(state[['Cohens D']] == "")
        parameter <- ",d=NULL"
    else
        parameter = paste(",d=",state[['Cohens D']],sep="")
    cmd <- paste(cmd,parameter);

    parameter = paste(",alternative='",state[['alternative']],"'",sep="")
    cmd <- paste(cmd,parameter);

    parameter = paste(",type='",state[['type of test']],"')",sep="")
    cmd <- paste(cmd,parameter);

    execute(cmd)
}

dialog$setRunFunction(toJava(runDialog))

deducer.addMenu("Power")
deducer.addMenuItem("t-test power",,"dialog$run()","Power")
if(.windowsGUI){
    winMenuAdd("Power")
    winMenuAddItem("Power", "t-test", "deducer('t-test power')")
}else if(.jgr){
    jgr.addMenu("Power")
    jgr.addMenuItem("Power", "t-test", "deducer('t-test power')")
}

dialog是的，但它能进行功率计算吗？阿努普，我想尝试一下Red-R，但安装要求似乎很高，我想尝试一下。看起来我不得不降级到R2.9.1，这已经很旧了。它在Mac OS X上工作吗？Farrel，我们没有包括功率计算功能。但是你可以在我们的论坛上发布一个请求，我们会尝试。伊恩，安装包括一个版本的R2.9.1，但不应该干扰你现有的R环境。是的，但它可以进行功率计算吗？阿努普，我想尝试一下Red-R，但安装要求似乎很高，我可以尝试。看起来我不得不降级到R2.9.1，这已经很旧了。它在Mac OS X上工作吗？Farrel，我们没有包括功率计算功能。但是您可以在我们的论坛上发布请求，我们将尝试。Ian，安装包括R2.9.1版本，但不应干扰您现有的R环境。