我曾经看到过一个快速而肮脏的 Perl 实现,用于剪切和粘贴 linux 命令。这有点像
perl 'print "$F1"' filename
替换 cut -f1 文件名命令
有人能告诉我这种 Perl 方式如何吗?具体来说,我很感兴趣,因为这与剪切/粘贴不同,在 Windows 环境中也能正常工作。
我将上下文菜单添加到richboxtext,只有一个函数"paste".什么代码会将我的剪贴板内容(例如从Microsoft Word复制)粘贴到richboxtext表单?我尝试过:
private void PasteToolStripMenuItem_Click_1(object sender, EventArgs e)
{
richTextBox1.Text = Clipboard.GetText();
}
Run Code Online (Sandbox Code Playgroud)
但它会粘贴非格式化文本.如何使用格式粘贴文本?
我有一个数据帧df0与n列.只有一列包含字符串,所有其他列都为空或包含""字符串.
是否有可能将数据框折叠到单个列数据框中,对于每一行,我得到非空元素?
DF0:
A B C
1 Car
2 Car
3 Bike
4 Car
5 Train
6 Train
Run Code Online (Sandbox Code Playgroud)
应该给:
1
1 Car
2 Car
3 Bike
4 Car
5 Train
6 Train
Run Code Online (Sandbox Code Playgroud) 假设你有两个数据框
df1 <- data.frame(V1 = c(1, 2, 3), v2 = c("a", "b", "c"))
df2 <- data.frame(V1 = c(1, 2, 2), v2 = c("b", "b", "c"))
Run Code Online (Sandbox Code Playgroud)
这是它们并排的样子:
> cbind(df1, df2)
V1 v2 V1 v2
1 1 a 1 b
2 2 b 2 b
3 3 c 2 c
Run Code Online (Sandbox Code Playgroud)
您想知道在所有变量中哪些观察是重复的。
这可以通过将列粘贴在一起然后使用 %in% 来完成:
df1Vec <- apply(df1, 1, paste, collapse= "")
df2Vec <- apply(df2, 1, paste, collapse= "")
df2Vec %in% df1Vec
[1] FALSE TRUE FALSE
Run Code Online (Sandbox Code Playgroud)
因此,第二个观察是 df2 和 df1 中唯一的一个。 …
我正在尝试使用类似的格式连接 R 中数据帧中的两行
row1 <- c("A","B","C")
row2 <- c(1:3)
dat <- data.frame(rbind(row1,row2))
dat
X1 X2 X3
row1 A B C
row2 1 2 3
Run Code Online (Sandbox Code Playgroud)
我想要第三排的类型
row3 A-1 B-2 C-3
Run Code Online (Sandbox Code Playgroud)
有人可以帮我使用粘贴功能来做到这一点吗?我一直在尝试以下方法但没有成功:
> paste(dat[1,], dat[2,], sep="-")
[1] "2-1" "2-1" "2-1"
> paste(as.character(dat[1,]), dat[2,], sep="-")
[1] "2-1" "2-1" "2-1"
Run Code Online (Sandbox Code Playgroud)
提前致谢!
我试图将小数点后的位数设置为 1。我已经完成了这个计算:
options(digits = 3)
DT<-data.table(x=c("a","b","c",NA,"b","e"),v=rnorm(6))
ans<-DT[,lapply(.SD,function(x) length(which(is.na(x)))/length(x)*100)]
Run Code Online (Sandbox Code Playgroud)
现在, ans 给我列中 NA 的百分比:
x v
16.7 0
Run Code Online (Sandbox Code Playgroud)
但是当我尝试添加百分比符号“%”时:
ans[,lapply(.SD, function(x) paste(x,"%",sep = ''))]
Run Code Online (Sandbox Code Playgroud)
十进制数字又回到了那里:
x v
1: 16.6666666666667% 0%
Run Code Online (Sandbox Code Playgroud)
我究竟做错了什么?我怎样才能得到这个输出?:
x v
16.7% 0%
Run Code Online (Sandbox Code Playgroud)
谢谢你。
我发现 Control-V 和 Shift-Insert 键盘快捷键都会在 Libreoffice 中粘贴格式化文本。这似乎是重复和浪费键盘快捷键。如何设置以便 shift-insert 在 Libreoffice 中粘贴未格式化的文本?目前,我必须去Edit > Paste Special > Unformatted text。谢谢你的帮助。
使用在线 ckeditor http://sdk.ckeditor.com/samples/classic.html 我看到过去的选项(粘贴、粘贴为纯文本和从 word 粘贴)不会从剪贴板复制。我给出了错误“您的浏览器不允许您以这种方式粘贴纯文本。按 Ctrl+Shift+V 粘贴.' 但它似乎在 IE 中工作(它提示允许访问)而不是在 Chrome 或 Firefox 中。
这是一个错误还是一些需要从浏览器或 ckEditor 完成的配置。因为我记得几个月前我使用了相同的行为,它曾经提供一个弹出窗口将您的内容粘贴到编辑器。
谢谢,维杰
我有 2 个图像,test1.jpg 和 test2.jpg,它们是 RGB 图像。它们是从 2D numpy 数组转换而来的,因此它们是单色图像。它们具有相同的形状。当我使用该paste功能时,我只看到其中一张图像,而不是两张图像。
以下是 test1 和 test2 jpg:
test1.paste(test2)这是我做完之后得到的test1.save('final.jpg'):
为什么只显示test2?
这是我的代码:
im1 = Image.open('test1.jpg')
im2 = Image.open('test2.jpg')
im1.paste(im2)
im1.save('final.jpg')
Run Code Online (Sandbox Code Playgroud) 也许它\xc2\xb4是无稽之谈,但我\xc2\xb4一直在玩paste和paste0但没有成功。
\n我的数据框看起来像这样
\nstck <-structure(list(haul = 1:11,\n year = c(1983L, 1983L, 1983L, 1983L, 1983L, 1983L, 1983L, 1983L, 1983L, 1983L, 1983L)),\n row.names = c(NA, 11L), class = "data.frame")\nRun Code Online (Sandbox Code Playgroud)\n我\xc2\xb4m 尝试生成如下代码:N83_01, N83_02, ...., N83_10
也就是说,我想创建一个代码,粘贴当年的最后两个数字加上运输编号(以“两个数字”格式)。
\n到目前为止,我无法\xc2\xb4t找到粘贴“N”的方法。这就是我所拥有的
\nstck$cod_lance <- as.factor(ifelse (stck$lance >=1 & stck$lance <10, paste(str_sub(stck$fecha, 3, 4), stck$lance, sep="_0"),\n paste(str_sub(stck$fecha, 3, 4), stck$lance, sep="_")))\nRun Code Online (Sandbox Code Playgroud)\n我怎样才能得到正确的输出?提前致谢。
\n