我在Windows 7上安装了OpenSSL x64,我是从Google Code上的openssl-for-windows下载的.我正试图跑:
openssl pkcs12 -export -in "path.p12" -out "newfile.pem"
但是我收到了一个错误.
unable to load private key
如何使用OpenSSL从PKCS#12商店中提取PEM中的证书？
我有一个data.table,我希望在某些列上执行相同的操作.这些列的名称以字符向量给出.在这个特定的例子中,我想将所有这些列乘以-1.
一些玩具数据和指定相关列的向量:
library(data.table)
dt <- data.table(a = 1:3, b = 1:3, d = 1:3)
cols <- c("a", "b")
现在我这样做,循环遍历字符向量:
for (col in 1:length(cols)) {
dt[ , eval(parse(text = paste0(cols[col], ":=-1*", cols[col])))]
}
有没有办法在没有for循环的情况下直接执行此操作？
请考虑以下actionButton演示:http://shiny.rstudio.com/gallery/actionbutton-demo.html
server.R:
shinyServer(function(input, output) {
# builds a reactive expression that only invalidates
# when the value of input$goButton becomes out of date
# (i.e., when the button is pressed)
ntext <- eventReactive(input$goButton, {
input$n
})
output$nText <- renderText({
ntext()
})
})
ui.R:
shinyUI(pageWithSidebar(
headerPanel("actionButton test"),
sidebarPanel(
numericInput("n", "N:", min = 0, max = 100, value = 50),
br(),
actionButton("goButton", "Go!"),
p("Click the button to update the value displayed in the main panel.")
),
mainPanel(
verbatimTextOutput("nText")
)
)) …如果我=vlookup(在公式栏中键入(或任何其他本机Excel函数),然后单击公式左侧的小Fx按钮,我将获得包含所有可用参数的"函数参数"提示.在该提示中,在函数参数下面,当您从每个参数的输入框移动光标时,函数和每个参数的一个或两个句子描述.
当我输入我的UDF名称并单击Fx时,我得到了所有参数的输入框,但就是这样.有没有办法可以添加本机Excel函数具有的那些相同的有用类型的描述？
我正在尝试使用doParallel和foreach包,但是我使用此处CRANpage中的指南中的bootstrapping示例来降低性能.
library(doParallel)
library(foreach)
registerDoParallel(3)
x <- iris[which(iris[,5] != "setosa"), c(1,5)]
trials <- 10000
ptime <- system.time({
r <- foreach(icount(trials), .combine=cbind) %dopar% {
ind <- sample(100, 100, replace=TRUE)
result1 <- glm(x[ind,2]~x[ind,1], family=binomial(logit))
coefficients(result1)
}
})[3]
ptime
此示例返回56.87.
当我将doparto 更改为仅do按顺序而不是并行运行时,它将返回36.65.
如果我这样做registerDoParallel(6)会将并行时间缩短到42.11但仍然比顺序慢. registerDoParallel(8)变得40.31比连续更糟糕.
如果我增加到trials100,000,那么顺序运行需要417.16和3个工作程序的并行运行597.31.它需要6名工人425.85.
我的系统是
戴尔Optiplex 990
Windows 7专业版64位
16GB RAM
英特尔i-7-2600 3.6GHz四核,具有超线程功能
我在这里做错了吗？如果我做了我能想到的最人为的事情(用计算代码替换Sys.sleep(1)),那么我得到的实际减少量与工人数量成正比.我想知道为什么指南中的例子会降低我的表现,而对他们来说它会加快速度？
假设我有一个data.table
set.seed(1) # to make the example reproducible
ex<-data.table(AAA=runif(100000),
BBB=runif(100000),
CCC=runif(100000),
DDD=runif(100000),
FLAG=c(rep(c("a","b","c","d","e"),200000)))
我想从AAA每隔一列中减去列,然后从BBB每个剩余的列(FLAG除外)等中减去,以便输出看起来像......
ex[,list(AAA_BBB=AAA-BBB,
AAA_CCC=AAA-CCC,
AAA_DDD=AAA-DDD,
BBB_CCC=BBB-CCC,
BBB_DDD=BBB-DDD,
CCC_DDD=CCC-DDD)]
是否有data.table语法可以干净地执行此操作而不知道有多少列或它们的名称是什么？
据NEWS称,data.table现已融化.
我看到了,然后去下载data.table 1.8.11,当我去安装它时,我收到一个错误,它不适用于R 2.15.3(这是我所使用的版本).基于此我更新到R 3.0.1并尝试再次安装它...
> install.packages("C:/[path]/data.table_1.8.11.zip", repos = NULL)
Warning in install.packages :
package ‘C:/[path]/data.table_1.8.11.zip’ is not available (for R version 3.0.1)
package ‘data.table’ successfully unpacked and MD5 sums checked
如果我这样做packageVersion("data.table"),我得到1.8.11,但如果我这样做?melt.data.table,我得到有没有它的文档.
如果我卸载data.table,我可以从CRAN重新安装data.table 1.8.10而不会出现任何错误.
有谁知道为什么我在新版本中遇到这些错误data.table？从C驱动器路径可以看出我在Windows上.
我试图实现Chebyshev过滤器以平滑时间序列但不幸的是,数据系列中有NA.
例如,
t <- seq(0, 1, len = 100)
x <- c(sin(2*pi*t*2.3) + 0.25*rnorm(length(t)),NA, cos(2*pi*t*2.3) + 0.25*rnorm(length(t)))
我正在使用Chebyshev过滤器: cf1 = cheby1(5, 3, 1/44, type = "low")
我试图过滤排除NAs的时间序列,但不会弄乱订单/位置.所以,我已经尝试过na.rm=T,但似乎没有这样的论点.然后
z <- filter(cf1, x) # apply filter
感谢你们.
如果我有一个看起来像这样的表
begin date end date data
2013-01-01 2013-01-04 7
2013-01-05 2013-01-06 9
如何让它像这样返回......
date data
2013-01-01 7
2013-01-02 7
2013-01-03 7
2013-01-04 7
2013-01-05 9
2013-01-06 9
我想做的一件事就是让另一个表只包含所有日期,然后使用date>=begin date和仅仅使用日期加入表中的表,date<=end date但是这似乎有点笨拙,只需重复日期就可以保留额外的表.
在某些情况下,我没有数据范围,只是一个as of日期基本上看起来像我的第一个例子,但没有end date.该end date由下一行的"作为"日暗示(即结束日期应该是下一行的as of-1).我有一个"解决方案",它使用row_number()函数来获取下一个值但我怀疑这种方法,我正在做的方式有一堆嵌套的自联接,这导致非常长的查询时间.
我正在运行需要 SSL 的 Postgres-9.4 服务器。当我使用 pgadmin 或 windows odbc 连接从我的笔记本电脑连接到 Postgres 服务器时，它可以使用 SSL。但是，当我尝试使用 SSL 连接 R 时，它失败了。
library(RPostgreSQL)
drv <- dbDriver("PostgreSQL")
con <- dbConnect(drv,
user = "postgres",
password = mypasswd,
dbname = "dbname=postgres sslmode=prefer",
host = "192.168.1.179")
如果我将 pg_hba.conf 设置为允许非 ssl 连接，那么这将起作用。当我将它设置为只允许 SSL 连接时，这将失败。不幸的dbConnect是没有verbose选择所以我什么也得不到could not connect postgres@192.168.1.179 on dbname "postgres"
我发现这个问题似乎表明我在做正确的事情，但是，不行。
编辑：
我做了更多的挖掘，发现这个讨论表明由于各种库/dll问题，这在 Windows 上不起作用。那个讨论在这一点上已经有几年了，所以也许它已经解决了。我可以确认从 linux 执行上述操作确实有效。