有很多从R向C++发送整数的例子,但我找不到发送字符串的例子.
我想做的很简单:
SEXP convolve(SEXP filename){
pfIn = fopen(filename, "r");
}
Run Code Online (Sandbox Code Playgroud)
这给了我以下编译器错误:
loadFile.cpp:50:错误:无法将参数
'1'的'SEXPREC*'转换为'const char*'为'FILE*fopen(const char*,const char*)'
所以我需要将文件名转换为const char*?我使用CHAR吗?
是否可以编写一个函数isFunc :: a -> Bool来确定任意值是否是一个函数(任何类型)
foo :: Int -> Int
bar :: Char -> Char -> Char
> isFunc foo
True
> isFunc bar
True
> isFunc 3
False
> isFunc 'a'
False
Run Code Online (Sandbox Code Playgroud)
我正在使用Data.Dynamic,所以我无法提前确定类型.
我是R的新手,我正在玩一个项目来绘制2010年到2020年阿拉巴马州预计的人口增长情况.这是我的代码:
dat <- read.table("C:/Users/rasmus/Documents/countyinfo.txt", sep="\t", header=TRUE)
library(ggplot2)
library(maps)
library(ggmap)
mdat <- map_data('county')
str(mdat)
al1 = get_map(location = c(lon = -86.304474, lat = 32.362563),
zoom = 7, maptype = 'roadmap')
al1MAP = ggmap(al1) +
geom_point(data=dat,inherit.aes = FALSE,
aes(y=Lat, x=Lon, map_id=County, size=Growth), col="red") +
borders("state", colour="red", alpha=0.8) +
borders("county", colour="blue", alpha=0.5)
al1MAP
Run Code Online (Sandbox Code Playgroud)
现在,我有两个问题.
1)国家边界似乎做了奇怪的事情.这是关闭县覆盖的屏幕截图:

2)鉴于这只是关于阿拉巴马州,我想关闭国界以外的边界,但我不知道该怎么做.我的猜测是试验xlim和ylim,但我不知道如何限制它们到阿拉巴马边界多边形.
I have a group of data with a factor nested within another factor.
Family Member Count
1 family1 Brother 3
2 family2 Brother 1
3 family3 Brother 1
4 family1 Dad 1
5 family2 Dad 1
6 family3 Dad 1
7 family1 Mom 1
8 family2 Mom 1
9 family3 Mom 0
10 family1 Pet 2
11 family2 Pet 0
12 family3 Pet 3
13 family1 Sister 3
14 family2 Sister 5
15 family3 Sister 3
Run Code Online (Sandbox Code Playgroud)
I want to show …
正在练习基本操作并找到一些有趣的东西.
test <- array(0,dim = c(1,26))
colnames(test) <- letters
Run Code Online (Sandbox Code Playgroud)
我期待一个字母作为colname的数组,但事实证明是这样的

第24列的名称无疑是"x",而结果则不是.有趣.埃里克
我刚刚开始使用该geom_map功能ggplot2.在阅读了我geom_map在这里找到的29篇帖子后,我仍然遇到了同样的问题.
我的数据框架非常大,包含超过2000行.它基本上是来自世界卫生组织编制的特定基因(TP53)的数据.
请从这里下载.
标题如下所示:
> head(ARCTP53_SOExample)
Mutation_ID MUT_ID hg18_Chr17_coordinates hg19_Chr17_coordinates ExonIntron Genomic_nt Codon_number
1 16 1789 7519192 7578467 5-exon 12451 155
2 13 1741 7519200 7578475 5-exon 12443 152
3 17 2143 7519131 7578406 5-exon 12512 175
4 14 2143 7519131 7578406 5-exon 12512 175
5 15 2168 7519128 7578403 5-exon 12515 176
6 12 3737 7517845 7577120 8-exon 13798 273
Description c_description g_description g_description_hg18 WT_nucleotide Mutant_nucleotide
1 A>G c.463A>G g.7578467T>C NC_000017.9:g.7519192T>C …Run Code Online (Sandbox Code Playgroud) 在我的Mac OS Yosemite上,我可以打开终端并运行subl它,它会打开Sublime Text.但是,如果我开始一个tmux会话并运行subl,我得到错误:
Unable to launch Sublime Text
Run Code Online (Sandbox Code Playgroud)
如果我尝试:
open -a "Sublime Text"
Run Code Online (Sandbox Code Playgroud)
我收到错误:
LSOpenURLsWithRole() failed for the application /Applications/Sublime Text.app with error -10810.
Run Code Online (Sandbox Code Playgroud) 我可以dplyr用来连接sqlite数据库:
library(dplyr)
mydb<- src_sqlite("DATA/mydb.db")
Run Code Online (Sandbox Code Playgroud)
如何列出表格mydb?我在帮助文件中找不到任何相关内容
我刚开始使用Jupyter和R,我想知道是否有一种很好的方式来显示HTML或LaTeX输出.
这是我希望工作的一些示例代码:
library(xtable)
x <- runif(500, 1, 50)
y <- x + runif(500, -5, 5)
model <- lm(y~x)
print(xtable(model), type = 'html')
Run Code Online (Sandbox Code Playgroud)
它不是呈现HTML,而是将其显示为纯文本.有没有办法改变这种行为?
我正在开展网络抓取计划,以搜索特定的葡萄酒,并返回该品种的当地葡萄酒清单.我遇到的问题是多页结果.下面的代码是我正在使用的基本示例
url2 <- "http://www.winemag.com/?s=washington+merlot&search_type=reviews"
htmlpage2 <- read_html(url2)
names2 <- html_nodes(htmlpage2, ".review-listing .title")
Wines2 <- html_text(names2)
Run Code Online (Sandbox Code Playgroud)
对于此特定搜索,有39页的结果.我知道网址更改为http://www.winemag.com/?s=washington%20merlot&drink_type=wine&page=2,但是有一种简单的方法可以使代码循环遍历所有返回的页面并编译所有39个结果页面成一个列表?我知道我可以手动完成所有网址,但这看起来有点矫枉过正.