如何将密码保存在包“encryptr”中的脚本 R 中?
How to save the password in script R in package ‘encryptr’?
我这样做:
library(encryptr)
genkeys()
我创建了密码:0)]30l^8
password<-"0)]30l^8"
data(gp)
write.csv(gp, "gp.csv")
encrypt_file("gp.csv")
我的问题是:如何在 decrypt_file("gp.csv.encryptr.bin", file_name = "gp2.csv")
上自动输入密码
我需要这个来在短时间内解密很多文件。
非常感谢您的提问。不建议在脚本中保存密码,因为在大多数情况下这会破坏加密文件的目的。虽然不推荐,但您可以解决此有意的功能。
password<-"0)]30l^8"
.crypt = readRDS("gp.csv.encryptr.bin") # in file
zz = file("gp2.csv", "wb") # out file
openssl::decrypt_envelope(.crypt$data, .crypt$iv, .crypt$session, key = "id_rsa", password = password) %>%
writeBin(zz)
close(zz)
我这样做:
library(encryptr)
genkeys()
我创建了密码:0)]30l^8
password<-"0)]30l^8"
data(gp)
write.csv(gp, "gp.csv")
encrypt_file("gp.csv")
我的问题是:如何在 decrypt_file("gp.csv.encryptr.bin", file_name = "gp2.csv")
我需要这个来在短时间内解密很多文件。
非常感谢您的提问。不建议在脚本中保存密码,因为在大多数情况下这会破坏加密文件的目的。虽然不推荐,但您可以解决此有意的功能。
password<-"0)]30l^8"
.crypt = readRDS("gp.csv.encryptr.bin") # in file
zz = file("gp2.csv", "wb") # out file
openssl::decrypt_envelope(.crypt$data, .crypt$iv, .crypt$session, key = "id_rsa", password = password) %>%
writeBin(zz)
close(zz)