小编Fra*_*art的帖子

我有从ODK Aggregate创建的JSON文件生成的列表数据.它看起来像:

P1 <- list(a01 = 1:11, a02 = letters[1:11], a03 = list(letters), a04 = (1:11)^2)

我想要做的是基本上通过删除任何嵌套列表(a03)将P1转换为数据帧.通过这个简单的例子,我们将得到以下作为最终输出.

P1data <- data.frame(a01 = 1:11, a02 = letters[1:11], a04 = (1:11)^2)

感谢您提供的任何帮助!

我想y作为我的因变量和x1 x2 x3我的自变量进行线性回归。我也有“控制”变量z1 z2 z3，我想包括但不显示结果。

summary(lm(y~x1+x2+x3+z1+z2+z3))

有没有一种汇总方法不显示我的控制变量的系数？

我希望能够在特定日期之后或之前从数据框中选择日期.例如,使用关于黄金价格的quandl数据.

pGold <- read.csv('http://www.quandl.com/api/v1/datasets/BUNDESBANK/BBK01_WT5511.csv?&trim_start=1968-04-01&trim_end=2014-01-08&sort_order=desc', colClasses=c('Date'='Date'))

pGold$asDate <- as.Date(pGold$Date)

head(pGold)
        Date   Value
1 2014-01-08 1226.50
2 2014-01-07 1237.50
3 2014-01-06 1238.00
4 2014-01-03 1232.25
5 2014-01-02 1219.75
6 2013-12-31 1201.50

plot(pGold[pGold$Date>"2012-01-01",], type="l", main="Price of Gold (USD)"))

我想知道是否有任何简单的R命令或软件包都可以让我轻松地将变量添加到data.frames,这些是变量的"差异"或随时间的变化.

如果我的数据看起来像这样:

set.seed(1)
MyData <- data.frame(Day=0:9 %% 5+1, 
                 Price=rpois(10,10),
                 Good=rep(c("apples","oranges"), each=5))
MyData

   Day Price    Good
1    1     8  apples
2    2    10  apples
3    3     7  apples
4    4    11  apples
5    5    14  apples
6    1    12 oranges
7    2    11 oranges
8    3     9 oranges
9    4    14 oranges
10   5    11 oranges

然后在"第一次区分"价格变量后,我的数据将如下所示.

   Day Price    Good P1d
1    1     8  apples  NA
2    2    10  apples   2
3    3     7  apples  -3
4    4    11  apples   4 …

在" 匿名函数"部分的"Julia手册"中,提供的示例之一是(x,y,z)->2x+y-z.

有人可以告诉我如何将一组参数传递给这个函数吗？

说x=(1,2,3); y=(2,3,4); z=(1,3,5).

好的,所以我仍然被基本语法所困扰.现在我想知道如何创建一个填充单个值c的矩阵,一旦创建了如何替换整行.到目前为止,这就是我所拥有的:

c = 5
nrow = 6
ncol = 4
parm = [c for i=1:nrow, j=1:ncol]
parm[5, 1:end] = 0

parm
6x4 Array{Any,2}:
 5  5  5  5
 5  5  5  5
 5  5  5  5
 5  5  5  5
 0  0  0  0
 5  5  5  5

上面的语法有效,但似乎不必要地冗长.有什么建议？

谢谢,弗朗西斯

我希望将无序长数据转换为宽数据.

mydata <- data.frame(cat   = c('a','a','a','b','c','c','c','c'),
                     color = c(  1,  1,  1,  2,  1,  1,  1,  1),
                     hat   = c(  1,  1,  2,  2,  1,  2,  1,  2),
                     shoe  = c(  0,  1,  1,  2,  1,  1,  1,  3))

cat是ID变量,而color是描述性统计,不会在其中发生变化cat.

mydata
    cat color hat shoe
1     a     1   1    0
2     a     1   1    1
3     a     1   2    1
4     b     2   2    2
5     c     1   1    1
6     c     1   2    1
7     c …

我想在将结果输入字符串运算符之前进行一些计算^。目前我正在做以下事情：

"adsf" ^ Float64(6)
# MethodError: no method matching ^(::String, ::Float64)

以下是我迄今为止的尝试：

Base.^(x, y::Float64) = x ^ Int(y)
# syntax: "(x,y::Float64)" is not a valid function argument name

总的来说，我认为函数形式是正确的：

fu(x, y::Float64) = x ^ Int(y)
fu("adsf", Float64(6)) 
# "adsfadsfadsfadsfadsfadsf"

对不起,如果这是一个愚蠢的问题.我查看了文档,我的目录或文件夹搜索没有出现,除了参考克隆整个github目录.

我还看了一个上一个问题" 如何将文件和文件夹添加到github repos？ ",但它似乎没有回答这个问题.

我想要创建的示例可以在https://github.com/rstudio/shiny/R找到,其中R是我想要创建的子目录.

弗朗西斯,一如既往地感谢您的考虑

我想将字符串中单个空格的所有空间减少到一个空格.

foo(" 1   2    3     4                 5 ")
[1] " 1 2 3 4 5 "