连接字符串中的数值

时间:2012-11-07 11:20:26

标签: string r concatenation paste cat

我想将此输出存储在字符串中:

> x=1:5
> cat("hi",x)
hi 1 2 3 4 5

所以我使用paste,但我得到了不同的结果:

> paste("hi",x)
[1] "hi 1" "hi 2" "hi 3" "hi 4" "hi 5"

知道如何获取字符串:

"hi 1 2 3 4 5"

非常感谢!

3 个答案:

答案 0 :(得分:47)

您可以通过将字符串x连接到"hi"来强制强制转换为x的字符。然后只需将paste()collapse参数一起使用即可。如在

x <- 1:5
paste(c("hi", x), collapse = " ")

> paste(c("hi", x), collapse = " ")
[1] "hi 1 2 3 4 5"

答案 1 :(得分:10)

您可以将capture.output与猫

一起使用
capture.output(cat('hi',x))
[1] "hi 1 2 3 4 5"

答案 2 :(得分:7)

您使用 $scope.spinWheel= new Winwheel({ 'numSegments' : 6, // Specify number of segments. 'outerRadius' : 138, // Set outer radius so wheel fits inside the background. 'lineWidth' : 2, 'segments' : // Define segments including colour and text. [ {'fillStyle' : '#eae56f', 'text' : 'Segment 1'}, {'fillStyle' : '#89f26e', 'text' : 'Segment 2'}, {'fillStyle' : '#7de6ef', 'text' : 'Segment 3'}, {'fillStyle' : '#e7706f', 'text' : 'Segment 4'}, {'fillStyle' : '#0D56A6', 'text' : 'Segment 5'}, {'fillStyle' : '#29c932', 'text' : 'Segment 6'} ], 'animation' : // Specify the animation to use. { 'type' : 'spinToStop', 'duration' : 5, // Duration in seconds. 'spins' : 10, // Number of complete spins. // 'callbackFinished' : 'alertPrize()' // Alert to show prize won } });

sprintf