Hi everyone,
This might be a very petty thing but Its not working for me.
 I want to export an output to a txt file but without indexing.
Here is what I  have tried to do

outfile<- function(Time, var.names, output) {
  var.names = c(names(para))
 for(i in 1: ncol(output)){
   cat(length(var.names), '\n')
   cat("A", "S", "C", "I", '\n')
   cat("time =", "yes", '\n')
   cat("RUN", i, '\n')
   cat(length(Time), '\n')
    print(cbind(Time, output[,i]))
 }
 }
This works fine and
I get the output like as follows

4
A S  C I
time = yes
RUN 1
111
       [,1]      [,2]
  [1,] 0.00 1.7500000
  [2,] 0.05 0.3983540
  [3,] 0.10 0.6010150
  [4,] 0.15 0.6759570
  [5,] 0.20 0.7165215
  [6,] 0.25 0.7423391
  [7,] 0.30 0.7603594
  [8,] 0.35 0.7737155
  [9,] 0.40 0.7840432
 [10,] 0.45 0.7922850
.
.
But I need need to have an output like this
4
A S  C I
time = yes
RUN 1
111
0.00 1.7500000
0.05 0.3983540
0.10 0.6010150
...


Any kind of help will be highly appreciated.

Thank you in advance

-- 
Acharya, Subodh

	[[alternative HTML version deleted]]

