R语言 无法在单独的行/新行上打印结果

3ks5zfa0  于 12个月前  发布在  其他
关注(0)|答案(2)|浏览(157)

我是一个初学者,所以我知道这很容易。不能使结果打印在一个新的一行后,每个结果。问题:

`x <- ("This is another way to figures out the decimal value in minutes")
print(x)
time_conv <- function(mins){
    paste((mins / 60),"is",mins,"seconds") 

}
print(time_conv(mins = 1:10))`



`[1] "This is another way to figures out the decimal value in minutes"
 [1] "0.0166666666666667 is 1 seconds" "0.0333333333333333 is 2 seconds"
 [3] "0.05 is 3 seconds"               "0.0666666666666667 is 4 seconds"
 [5] "0.0833333333333333 is 5 seconds" "0.1 is 6 seconds"               
 [7] "0.116666666666667 is 7 seconds"  "0.133333333333333 is 8 seconds" 
 [9] "0.15 is 9 seconds"               "0.166666666666667 is 10 seconds"

字符串
`

laawzig2

laawzig21#

不知道为什么你会想这样打印东西到控制台,但这可能会做到这一点:

x <- ("This is another way to figures out the decimal value in minutes")

time_conv <- function(mins){
  paste((mins / 60),"is",mins,"seconds", "\n") 
  
}

writeLines(time_conv(mins = 1:10))
#> 0.0166666666666667 is 1 seconds 
#> 
#> 0.0333333333333333 is 2 seconds 
#> 
#> 0.05 is 3 seconds 
#> 
#> 0.0666666666666667 is 4 seconds 
#> 
#> 0.0833333333333333 is 5 seconds 
#> 
#> 0.1 is 6 seconds 
#> 
#> 0.116666666666667 is 7 seconds 
#> 
#> 0.133333333333333 is 8 seconds 
#> 
#> 0.15 is 9 seconds 
#> 
#> 0.166666666666667 is 10 seconds

字符串
创建于2023-12-11使用reprex v2.0.2

ru9i0ody

ru9i0ody2#

一种方法可能是这样的:

time_conv <- function(mins) {
  results <- paste((mins / 60), "is", mins, "seconds")
  for (result in results) {
    print(result)
  }
}

time_conv(mins = 1:10)

个字符

相关问题