如何另起一行？

1. # 修正，数在x中的奇数个数
   
2. oddcount2<- function(x){
   
3.     k<-0
   
4.     for(n in x){
   
5.   if(n%%2 ==1) k<-k+1
   
6.   }
   
7.   cat( "奇数个数=" , k,"\n")

复制代码

上面是脚本文件source("oddcount2.R")
oddcount2(c(1,3,5))
结果是这样：

我想让提示符>另起一行，正常的那样，怎么办？

我运行你的code之后，会另起一行

> oddcount2<- function(x){
+   k<-0
+   for(n in x){
+     if(n%%2 ==1) k<-k+1
+   }
+   cat( "奇数个数=" , k,"\n")
+ }
> oddcount2(c(1,3,5))
奇数个数= 3
>

我的也是可以另起一行的

成功了，多谢两位朋友！