小编Joh*_*lee的帖子

我有一个矢量:

x <- c(0.0, 0.5, 1.000, 1.5, 1.6, 1.7, 1.75, 2.0, 2.4, 2.5, 3.0, 74.0)

如何仅提取x小数位后包含非零值的值？例如,结果向量将如下所示:

c(0.5, 1.5, 1.6, 1.7, 1.75, 2.4, 2.5)

其中已移除0.0,1.000,2.0,3.0,和74.0.

我有一系列包含食谱的嵌套部分，按菜肴类型分组，例如：

content\n\xe2\x94\x94\xe2\x94\x80 recipes\n \xc2\xa0 \xe2\x94\x9c\xe2\x94\x80 _index.md\n \xc2\xa0 \xe2\x94\x9c\xe2\x94\x80 bread\n \xc2\xa0 \xe2\x94\x82\xc2\xa0\xc2\xa0\xe2\x94\x9c\xe2\x94\x80 _index.md\n \xc2\xa0 \xe2\x94\x82\xc2\xa0\xc2\xa0\xe2\x94\x9c\xe2\x94\x80 beer_rolls.md\n \xc2\xa0 \xe2\x94\x82\xc2\xa0\xc2\xa0\xe2\x94\x9c\xe2\x94\x80 ciabatta.md\n \xc2\xa0 \xe2\x94\x82\xc2\xa0\xc2\xa0\xe2\x94\x94\xe2\x94\x80 potato_bread.md\n   \xe2\x94\x9c\xe2\x94\x80 dessert\n \xc2\xa0 \xe2\x94\x82\xc2\xa0\xc2\xa0\xe2\x94\x9c\xe2\x94\x80 _index.md\n   \xe2\x94\x82\xc2\xa0 \xe2\x94\x9c\xe2\x94\x80 chocolate_brownies.md\n   \xe2\x94\x82\xc2\xa0 \xe2\x94\x9c\xe2\x94\x80 elderberry_pie.md\n   \xe2\x94\x82\xc2\xa0 \xe2\x94\x94\xe2\x94\x80 victoria_sponge_cake.md\n   \xe2\x94\x94\xe2\x94\x80 mains\n      \xe2\x94\x9c\xe2\x94\x80 _index.md\n      \xe2\x94\x9c\xe2\x94\x80 bean_chilli.md\n      \xe2\x94\x9c\xe2\x94\x80 braised_leeks.md\n      \xe2\x94\x94\xe2\x94\x80 yorkshire_pudding.md\n

我想编写一个list.htmlfor content/recipes/_index.md，以生成反映 中目录结构的嵌套列表recipes/，以便列表的第一级链接到小节，例如breador dessert，列表的第二级链接到各个食谱，例如bread/beer_rolls.mdor mains_bean_chilli.md。

其中包含什么list.html？我是否需要有多个list.html文件，每个嵌套小节一个？

我有一个向量列表(mylist):

a <- c(1,2,3,4)
b <- c(5,6,7,8)
c <- c(9,10,11,12)
mylist <- list(a,b,c)

我也有一个位置向量(mypos):

mypos <- c(1,2,3)

我想用它mypos来给元素的位置分配每个向量的子集,mypos以便它返回:

 [1] 1 6 11

我试过像这样使用lapply:

lapply(mylist, "[", mypos) 

但这会返回每个向量的元素1,2和3:

[[1]]
 [1] 1 2 3

[[2]]
 [1] 5 6 7

[[3]] 
 [1] 9 10 11

我也尝试过:

lapply(mylist, subset, mypos)

但是这会返回一个错误,该子集必须是逻辑的

我有一个有用信息的数据框：

X = c(1,2,3,4,5,6,7,8,9,10)
Y = c(5,4,3,2,1,0,1,2,3,4)
Z = c(11,12,13,14,15,16,17,18,19,20)

df <- data.frame(X, Y, Z)

以及行和列位置的数据框：

row <- c(6,2,5)
column <- c(1,2,3)


pos <- data.frame(row, column)

我想使用一些fun使用列和行位置的函数（）pos来返回df占据这些位置的值，例如

fun(df, pos$row, pos$column)
[1] 6 4 15

我以为我可以这样做，但无济于事

df[c(pos$row),c(pos$col)]

我有一个数据框:

a <- c(1,2,3,4,5,6)

b <- c(1,2,1,2,1,4)

c <- c("A", "B", "C", "D", "E", "F")

df <- data.frame(a,b,c)

我想要做的是创建另一个向量d,其中包含c行中a与每个值匹配的值b

所以我的新矢量看起来像这样:

d <- c("A", "B", "A", "B", "A", "D")

作为一个例子,的最终值b就是4,其与第4行匹配a,所以值d是的第四行c,这是"D".

我有一个包含几百列的数据框,每列都有数字数据.

对于每列,我想识别具有最接近零的值的单元格的值,而不是正数.

例如

X = c(-1,-2,-3,-4,-5,-6,-7,-8,-9,-10)
Y = c(5,4,3,2,1,0,-1,-2,-3,-4)
Z = c(-11,-12,-13,-14,-15,-16,-17,-18,-19,-20)

df <- data.frame(X, Y, Z)

我想要一些函数(有趣)来返回这个向量:

fun(df)

[1] -1 0 -11

我以为我可以使用应用函数,甚至可能使用循环或管道？