在MacOSX上,我正在使用Packer来构建一个Vagrant盒子,因此我需要不断地将其打开并将其拆除.我试图'流浪',并收到标准错误,因为端口正在使用:
"Vagrant无法转发此VM上的指定端口,因为它们会与已经在这些端口上侦听的其他应用程序发生冲突.转发到8080的端口已在主机上使用."
解决方案似乎很简单:我只需要确定将端口8080保持打开并终止该进程的进程,对吧?那并没那么简单.
如果我运行命令:
nmap localhost -p 8080
Run Code Online (Sandbox Code Playgroud)
我收到以下输出:
PORT STATE SERVICE
8080/tcp open http-proxy
Run Code Online (Sandbox Code Playgroud)
如果我运行以下命令:
top -o prt
Run Code Online (Sandbox Code Playgroud)
1360年使用的最高港口
如果我运行以下命令:
netstat -tulpn | grep :8080
Run Code Online (Sandbox Code Playgroud)
我收到:
netstat: n: unknown or uninstrumented protocol
Run Code Online (Sandbox Code Playgroud)
如果我运行以下命令:
lsof -i :8080
Run Code Online (Sandbox Code Playgroud)
我没有收到任何输出
如果我重新启动计算机,该端口现在可用,我现在可以"流浪"了.
如何杀死使用端口8080的任何进程,以便我可以在不重新启动计算机的情况下流浪?
我希望在每次相等值运行中创建一个序列号,比如一个出现计数器,一旦当前行中的值与前一行不同,它就会重新启动.
请在下面找到输入和预期输出的示例.
dataset <- data.frame(input = c("a","b","b","a","a","c","a","a","a","a","b","c"))
dataset$counter <- c(1,1,2,1,2,1,1,2,3,4,1,1)
dataset
# input counter
# 1 a 1
# 2 b 1
# 3 b 2
# 4 a 1
# 5 a 2
# 6 c 1
# 7 a 1
# 8 a 2
# 9 a 3
# 10 a 4
# 11 b 1
# 12 c 1
Run Code Online (Sandbox Code Playgroud)
我的问题与这个问题非常相似:值的累积序列.
我想从这个列表中提取第一个值:
[[1]]
[1] " \" 0.0337302" " -0.000248016" " -0.000496032" " -0.000744048"
[5] " -0.000992063" " -0.00124008" " -0.0014881" " -0.00173611"
[9] " -0.00198413" " -0.00223214" " -0.00248016" " -0.00272817"
[13] " -0.00297619" " -0.00322421" " -0.00347222" " -0.00372024"
[17] " -0.00396825" " -0.00421627" " -0.00446429" " -0.0047123"
[21] " -0.00496032" " -0.00520833" " -0.00545635" " -0.00570437"
Run Code Online (Sandbox Code Playgroud)
这个测试的名称是M,我测试了这个M[1],M[[1]]但我没有得到正确的答案.我怎样才能做到这一点?
我想使用该update()函数来更新模型的随机部分,特别是添加随机效果。大多数示例(help("update"), help("update.formula"), lme4:mixed effects Modeling with R)都集中在模型的固定部分。我怎么会从进入fm0到fm1使用update()在下面的例子吗?
library(lme4)
(fm0 <- lmer(Reaction ~ Days + (1 | Subject), sleepstudy))
(fm1 <- lmer(Reaction ~ Days + (1 + Days | Subject), sleepstudy))
Run Code Online (Sandbox Code Playgroud) 运行C包的R包检查(在Windows 7,Rstudio,R 2.15.3和Rtools30上)时,我很难摆脱一系列“无可见的绑定”注释。
我已经尝试了以下成功的方法:-使用推荐的utils :: globalVariables(c(“ sig”,“ dat”,... etc-使变量为NULL,例如sig = NULL; dat = NULL;
最终发生的事情是我得到了“无法更改sig的锁定绑定的值”等信息。该代码可以正常工作,但由于这些绑定错误而无法被接受。
CRAN的人员告诉我使用:utils :: globalVariables()。我应该在哪里放置此功能?
从SKOS 集合的W3C页面中我了解到概念可以分组在"集合"中.但是,概念也可以是概念方案的一部分.
我是否正确地假设两者之间的区别在于,一个conceptScheme将更多地基于一些理论基础或模式,而集合是更多任意概念集?
例如,如果我有一个产品系列的模式,并且客户会有这些产品的组合,那么我是否会将整个产品系列作为conceptScheme,同时将客户所拥有的产品称为集合?
我正在努力掌握data.table的文档,但是我想请求反馈,我在以下方面的推理中出错了.
(1)我想从data.table中选择一系列列来创建一个新的data.table.
(2)另外,我想取每组的第一个值.关于第一个问题,我认为这里给出了答案,但是关于列号.但我想使用列名,我认为这是data.table的主要优势(和卖点)之一.
这是一个示例数据集.
DT <- data.table(ID=c(101,101,101,102,103,104,104),
"year.1" = c(1,5,3,2,3,4,8),
"year.2" = c(4,5,6,NA,1,2,3),
"year.3" = c(1,2,3,7,9,8,0),
"year.4" = c(4,5,NA,1,2,6,9))
setkey(DT,ID)
Run Code Online (Sandbox Code Playgroud)
实际上我有更多的专栏而不仅仅是"年".
# ALL OF THESE DONT WORK AND END IN ERRORS
# To extract a range of columns I have tried this:
dt.sub <- DT[,list(year.1:year.3,ID)]
dt.sub <- DT[,c("year.1":"year.3",ID), with=FALSE] # I know shouldn't work since
# "with=FALSE" is only intended in combination with := according to the documentation
dt.sub <- DT[,lapply(SD),.SDcols= for (i in 1:3) paste0("year.",i) ]
Run Code Online (Sandbox Code Playgroud)
对于第二个问题:如果我希望dt.sub仅包含每个组的第一个观察,我希望我可以使用"mult"参数.然而,这也与我预期的方式不同.仅在一列上使用该示例: …
使用R,我想在一些数据集中添加一个计数器变量(id变量).例如,我有两个数据集x.df和y.df:
x1 <- c(1,3,5,7)
x2 <- letters[1:4]
x.df <- as.data.frame(cbind(x1, x2))
y1 <- c(100,200,300,400,500)
y2 <- c(letters[22:26])
y.df <- as.data.frame(cbind(y1, y2))
Run Code Online (Sandbox Code Playgroud)
对于这些数据集,我想添加一个id变量"id":
datasets <- c("x.df","y.df")
for (i in datasets) {
i$sortid <- c(1:nrow(i))
}
Run Code Online (Sandbox Code Playgroud)
这会导致错误:
1中的错误:nrow(i):长度为0的参数
我想,是什么原因造成的错误,建议在这里布赖恩·迪格斯,谁注意到:我是一个字符串; 你想要在i中保存名称的对象.这是get()函数.
但是,我不确定如何将get函数应用于"数据集"的元素.另外我不认为lapply在这里是合适的,因为我想添加一个不输出列表的变量,但也许我错了?
任何意见表示赞赏,
理查德
我正在尝试使用data.table按组显示重复项.更具体地说,我试图找出一年中某个国家是否有多个观察结果.这是一个示例数据集:
# load data.table package, assuming it's installed
library(data.table)
# create dataset
year <- rep(2010:2012, 3)
country <- c(rep("A", 3), rep("B", 3), rep("C", 3))
value <- sample(2:200, 9, replace = TRUE)
df <- cbind(year, country, value)
df <- rbind(df, c(2012, "C", 20))
df # show data
# put data frame in data.table format and set year as key
dt <- data.table(df)
setkey(dt, year)
Run Code Online (Sandbox Code Playgroud)
请注意,对于2012年,国家"C"是两个观察,而所有其他国家观测是按年度独特的.
我希望以下代码能为我提供重复国家和年份的名称:
dt[duplicated(country), country, by = year]
Run Code Online (Sandbox Code Playgroud)
相反,它显示了2011年以后的所有数据,这意味着重复的功能应用于整个data.table而不是年份.我将如何使用data.table在2012年提取国家"C"的单个重复值?