我想将此输出存储在字符串中:
> 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"
非常感谢!
答案 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