我想将函数应用于向量。但是,该函数需要一系列参数。因此,我需要将向量“拆分”为不相关的参数。
假设我有一个名为dta的数据框。我想运行一个函数,例如在其列之一上运行平均值,例如 DV。
下图显示了问题所在
call("mean", dta$DV)
Run Code Online (Sandbox Code Playgroud)
回报
mean(c(0.371, -0.860, etc... ))
Run Code Online (Sandbox Code Playgroud)
该列是向量这一事实与函数mean不兼容,该函数需要一系列参数,而不是组合。
如果“mean”被替换为包含字符串的变量,则该解决方案应该有效,例如
fun <- "mean"
call( fun, dta$DV)
Run Code Online (Sandbox Code Playgroud) 我上传了一个 2F1 超几何函数,但结果发现它无法在我的计算机上编译。是出自这篇文章。我用
GNU Fortran (Built by Jeroen for the R-project) 8.3.0
Run Code Online (Sandbox Code Playgroud)
随 RTools 4.0 一起提供。你能找出为什么它不能编译以及如何解决这个问题吗?在下面的代码中,我只保留了生成错误的一行。接下来给出错误。
MODULE HYP_2F1_MODULE
!--------------------------------------------------------------------
IMPLICIT NONE
INTEGER, PARAMETER :: PR=KIND(1.0D0)
REAL(PR) :: ONE=1.0D0
CONTAINS
!
END MODULE HYP_2F1_MODULE
!
!----------------------------------------------------------------------
RECURSIVE FUNCTION LOG_GAMMA(Z) RESULT(RES)
USE HYP_2F1_MODULE
IMPLICIT NONE
COMPLEX(PR),INTENT(IN) :: Z
COMPLEX(PR) :: RES
!
RES = LOG_GAMMA( ONE -z);
!
END FUNCTION LOG_GAMMA
Run Code Online (Sandbox Code Playgroud)
这是错误消息
testZ.f90:18:22:
RES = LOG_GAMMA( ONE - Z);
1
Error: 'x' argument of 'log_gamma' intrinsic at (1) must be …Run Code Online (Sandbox Code Playgroud) 假设使用 ggplot2 创建的小提琴图只有一个因素(在水平轴上)。该图显示无色小提琴,因为 x 轴使用单因素。
例如,这个快速 MWE:
oneplot <- ggplot(ToothGrowth, aes(x=dose, y=len)) +
geom_violin()
oneplot
Run Code Online (Sandbox Code Playgroud)
之后可以设置填充颜色吗?在我的实际设置中,情节是通过负责多种事物的大型程序生成的,并且它不分配“填充”美学;它只是提供了一个可以在事后使用附加图形指令(例如scale_fill_manual.
我希望我可以添加一些指令,例如,
oneplot + scale_fill_manual(breaks = c(0.5,1,2), values = c("orange", "purple","blue"))
Run Code Online (Sandbox Code Playgroud)
但目前,馅料完全无色!