R 如何在mutate中获取函数（x）中数据帧值x的列名？

我想知道如何在函数中获取x的列名

图书馆管理员 帕默彭斯图书馆 数据企鹅 数据星球大战 企鹅参考% 过滤器种类！=颏带%>% 选择1，3:6%>% 变异物种=案例(当物种==Adelie~高度时)， 种类==Gentoo~质量%>% 雀巢数据=-物种 星战参考号% 选择名称、高度、质量%>% 突变八，质量， functionx 如果Elsex>90， 企鹅[penguins_ref$species==colnamesx，数据]， 0 在上面的代码中，我无法从数据帧值penguins_ref[penguins_ref$species==colnamesx，data]获取列名，我希望在从penguins_ref调用的starwars_ref中有嵌套值

---

谢谢。

我不太确定您对最终输出的期望，但也许这就是您想要的

星战%>% 选择名称、高度、质量%>% pivot\u更长的名称，名称\u to=物种%>% 左边的企鹅参考，由=物种%>% mutatevalue=如果elsevalue>90，数据，列表值%>% 选择数据%>% pivot\u widernames\u from=物种，值\u from=值 A tibble:87 x 3 名称高度质量 1卢克·天行者 2 C-3PO 3 R2-D2 4达斯维德 5莱娅·奥加纳 6欧文·拉尔斯 7贝鲁·怀特森·拉尔斯 8 R5-D4 9比格斯暗灯 10欧比万·克诺比 ... 还有77行 其想法是将星球大战从宽改为长，然后加入企鹅队的数据，如果值>90，则用数据替换值；然后再次重塑以恢复原始宽格式

---

请注意，这似乎是一种笨拙的格式：height和weight是列表列，有些条目是tibble，有些条目是标量。

在匿名函数中，x不是列，而是向量。很遗憾，你不能像那样直接得到它的名字。谢谢你的回复。有解决办法吗？最后，我想用penguins_ref的嵌套数据替换starwars_ref的当前值，该值大于90。