我想跟踪一个函数,以便它在调用时打印其所有参数,并在返回结果时打印返回值和参数。函数跟踪允许定义在进入和退出函数调用时要执行的操作。是否有一个函数返回函数内的参数列表,是否有一种方法可以获取结果值,而无需执行每个分支退出该函数的多个分支中的每个分支?
在下面的示例中,跟踪应打印调用时的输入参数(或作为文本的函数调用本身)以及函数在任一分支中退出时的返回值的列表。
myfun <- function(a,b){
if (a==1) return(b+1)
if (a==2) return(b*10)
return(b)
}
Run Code Online (Sandbox Code Playgroud) library(tidyverse)
library(emojifont)
load.emojifont("OpenSansEmoji.ttf")
pal <- c("\U1f337"="blue","\U1f370"="red")
set.seed(124)
xdf <- data_frame(x=rnorm(10),y=rnorm(10),
label=rep(c("\U1f337","\U1f370"),5))
xdf %>% ggplot(aes(x=x,y=y,label=label,color=factor(label))) +
geom_text(family="OpenSansEmoji") +
scale_color_manual("object",values=pal) +
guides(color=guide_legend(labels=FALSE)) +
theme(legend.text=element_text(family="OpenSansEmoji"))
Run Code Online (Sandbox Code Playgroud)
很容易看出,这个传说的信息量非常大。如果能用彩色表情符号代替两倍的彩色字母就好了a,我希望用单词tulip和代替黑色表情符号cake。
这能实现吗?
有没有办法将制作的电影保存ffmmeg_renderer为av_renderer单独的文件?我总是将主题作为数据嵌入到 html 文件中。
在 left_join 之后,我有变量var1.x var2.x... 和var1.y var2.y。我想将它们重命名为var1_tot var2_tot和var1_part var2_part。我可以做到这一点,但是组合names和字符串替换功能。dplyr这可以通过使用dplyr的rename函数 和来作为链的一部分来完成吗ends_with?
我需要帮助Makevars为包含 C 函数的包编写文件,这些函数将使用 .C(...) 进行调用
该目录包含
Makevars (empty at the moment)
midicsvR-package.c (automatically generated)
c_csvmidi.c (contains one of the C functions to be called with .C())
c_midicsv.c (contains another one of the C functions to be called with .C())
midio.c
csv.c
midio.h
csv.h
midifile.h
types.h
version.h
Run Code Online (Sandbox Code Playgroud)
我可以编译so文件,然后像这样用.C()调用
R CMD SHLIB -o c_midicsv.so c_midicsv.c midio.c csv.c
R CMD SHLIB -o c_csvmidi.so c_csvmidi.c midio.c csv.c
这些函数在 R 函数中使用 .C() 调用时起作用。我需要写什么Makevars在软件包安装时自动发生这种情况。
我的问题是midio.c和csv.c包含c_midicsv.c和 的支持函数 …