Question

尝试解决我的雇主为我提供的R代码问题。我对R没有特别的经验，所以如果这很简单，我道歉。我尝试搜索它，但其他响应似乎对他们的问题非常具体，所以他们没有帮助。

尝试将数据导出到Excel时出现此错误。

as.data.frame.default（x [[i]]，optional = TRUE，stringsAsFactors = stringsAsFactors）出错：不能强迫上课＆＃34;＆＃34; powerCurve＆＃34;＆＃34;到data.frame

我从一个更大的等式中运行这段代码。

##检查#replications   RepMax =聚合（Rep~Crurt，max，data = Power_Select1）   平均（RepMax $代表）

##验证固定效果   fixef（Model_ISA_Power）

##指定newfix效果---产量差异1,2,3,4,5,6 bu /英亩   fixef（Model_ISA_Power）[＆＃34; TRTManure + 50＆＃34;] = 1.0

modelTrial = extend（Model_ISA_Power，沿=＆＃34; Rep＆＃34;，n = 20）

## Replications

\ Reps_Bushel_1＆lt; - powerCurve（modelTrial，along =＆＃34; Rep＆＃34;，alpha = .05，nsim = 100，＆gt; breaks = 3:15）   打印（Reps_Bushel_1）

xlsx.writeMultipleData（＆＃34; OutputTest.xlsx＆＃34 ;,         Reps_Bushel_1）

有没有人可以帮我确定如何将这些信息输入Excel，或者至少为什么我会收到强制错误？

当我运行脚本时，我得到如下格式的数据：

＆＃13;

> print(Reps_Bushel_1)
Power for predictor 'TRT', (95% confidence interval),
by largest value of Rep:
      3: 12.00% ( 6.36, 20.02) - 18 rows
      4: 11.00% ( 5.62, 18.83) - 22 rows
      5: 10.00% ( 4.90, 17.62) - 28 rows
      6: 10.00% ( 4.90, 17.62) - 34 rows
      7:  7.00% ( 2.86, 13.89) - 40 rows
      8:  8.00% ( 3.52, 15.16) - 44 rows
      9:  5.00% ( 1.64, 11.28) - 50 rows
     10:  7.00% ( 2.86, 13.89) - 56 rows
     11:  9.00% ( 4.20, 16.40) - 62 rows
     12:  8.00% ( 3.52, 15.16) - 66 rows
     13: 10.00% ( 4.90, 17.62) - 72 rows
     14: 10.00% ( 4.90, 17.62) - 78 rows
     15: 10.00% ( 4.90, 17.62) - 84 rows

＆＃13;

我们正在尝试从3：到最终导出到Excel的信息。

Answer 1

看起来类PowerCurve的对象不会存储为数据帧。

您应该做的第一件事是查看对象的结构：

str（Reps_Bushel_1）

我怀疑这个对象有几个组件，每个组件都有不同的名称，如命令所示：

名称（Reps_Bushel_1）

假设组件名为component1，component2等。然后您可以提取您感兴趣的组件 - 比如component1 - 并检查其结构：

STR（Reps_Bushel_1 $ COMPONENT1）

如果结构是“data.frame”甚至是“矩阵”，您可以从R中导出Reps_Bushel_1 $ component1而不会出现任何问题。如果不是，那么我们需要更多细节才能提供帮助。

不能强迫上课＆＃34;＆＃34; powerCurve＆＃34;＆＃34;到data.frame

1 个答案: