我有一个函数,只是做一个打印,mytable是一个全局变量
f <- function(field){ print(mytable[mytable$a == field,]) }
我的问题是,这个函数被调用(不是我,它是由另一个进程的命令发送至R像编辑器)的f(EXAMPLE),f(EXAMPLE2)...失败的原因EXAMPLE是没有定义的变量,我想EXAMPLE是"EXAMPLE"(字符串) .
我能在功能上做f了field有值"示例"时,f(EXAMPLE)被评估？
我意识到这很复杂......
我使用console2,我想,当我火来执行一些简单的事情console2一样
set PATH=%PATH%;C:\MyPgm\Git\bin
我怎么能做这样的事情.而在旁边是某个地方,我可以找到控制台2的漂亮配置的例子
我试图找到一种有效的方法来按组查找第一行和最后一行.
R) ex=data.table(state=c("az","fl","fl","fl","fl","fl","oh"),city=c("TU","MI","MI","MI","MI","MI","MI"),code=c(85730,33133,33133,33133,33146,33146,45056))
R) ex
state city code
1: az TU 85730
2: fl MI 33133
3: fl MI 33133
4: fl MI 33133
5: fl MI 33146
6: fl MI 33146
7: oh MI 45056
我想找到一个组的每个变量的第一个和最后一个
R) ex
state city code first.state last.state first.city last.city first.code last.code
1: az TU 85730 1 1 1 1 1 1
2: fl MI 33133 1 0 1 0 1 0
3: fl MI 33133 0 0 0 0 0 0
4: fl …我有一个相当大的map<double, vector<double>>发言权myMap.我想把内容myMap[.].second放在一个list<vector<double> >或vector<vector<double> >.是否可以在不明确复制每个vector元素的情况下完成它？我希望它是可行的iterators
#include <iostream>
#include <vector>
#include <map>
using namespace std;
int main()
{
double v_value[] = {1.1,2.4};
vector<double> v(v_value, v_value + sizeof(v_value)/sizeof(double));
map<double,vector<double> > myMap;
myMap[10.01] = v;
myMap[14.62] = v;
}
我知道如何找到经验分布的分位数。
set.seed(1)
x = rnorm(100)
q = quantile(x, prob=seq(0,1,.01))
是否有一个函数可以使我获得一些训练集所属的分位数仓？在这个例子中
R) x[1]
[1] -0.6264538107
R) q
0% 1% 2% 3% 4% 5% 6% 7% 8%
-2.214699887177 -1.991605177777 -1.808646490230 -1.532008555284 -1.472864960560 -1.381744198182 -1.282620249360 -1.255240516814 -1.226934277726
9% 10% 11% 12% 13% 14% 15% 16% 17%
-1.137935552774 -1.052657473293 -0.946201701058 -0.847444894718 -0.822439213796 -0.754080533415 -0.714945447616 -0.707887360796 -0.691941403160
18% 19% 20% 21% 22% 23% 24% 25% 26%
-0.637668149828 -0.622231094280 -0.613869230709 -0.594247090071 -0.576841631266 -0.569725969545 -0.548795719430 -0.494242549079 -0.474635485293
27% 28% 29% 30% 31% 32% 33% 34% 35%
-0.451421239288 …当我使用grep(GNU grep) 2.22 打印不开始#或不为空的内容时，我需要做
$ grep -v '^#' fileNameIGrepFor | grep -v '^$'
我认为这很丑陋，有没有更聪明的方法（grep请使用）
我正在寻找一种方法来替换以下每个字符中的所有_(例如'')
x <- c('test_(match)','test_xMatchToo','test_a','test_b')
当且仅当_后面跟着(或x.所以想要的输出是:
x <- c('test(match)','testxMatchToo','test_a','test_b')
怎么做(使用任何包都没问题)？
我正在写一本笔记本。在yaml我有
---
title: "title"
author: Me
output: html_notebook
inputs:
runDate: !r Sys.Date()-1
---
```{r, eval=FALSE}
params$stuff <- 'toto'
```
但是当我这样做时，rmarkdown::render('file.Rmd')我得到了Error in params$stuff = "toto" :cannot change value of locked binding for 'params'
为什么会这样，我该如何解决？
我有一个map<T,vector<double> >,说T=char的值vector<double>的length<n发言权n=5.我想将每个vector<double>从地图转移到一个vector<double>有长度的大n*mapsize,每个向量插入索引5*k.如果可能,所有这些都不需要复
#include <vector>
#include <map>
using namespace std;
int main()
{
typedef vector<double> Vec;
typedef map<char, vector<double> >::iterator ItMap;
//create a map<char,vector<double>> with 2 keys holding resp 2-3 elem vectors
double v_value[] = {1.1,2.4};
Vec v(v_value, v_value + sizeof(v_value)/sizeof(double));
map<char,vector<double> > myMap;
myMap['A'] = v;
v.push_back(10);
myMap['B'] = v;
//create the vector that should get all the small vectors
Vec receipt; …我有一个字符串:"C:/This/is/a/windows/path/file20110312name20120221.csv".
我想提取所有日期(例如[0-9]{8}).
通常,如何从较大的字符串中提取与模式匹配的子字符串？