I am running a for loop to fill dynamically a dataframe (I know a baby seal dies somewhere because I am using a for loop)

I have something like this in mind (the 5 is a placeholder for a function that returns a scalar):

```
results<-data.frame(matrix(NA, nrow = length(seq(1:10)), ncol = 
length(seq(1:10))))
rows<-data.frame(matrix(NA, nrow = 1, ncol = 1))
for (j in seq(1:10)){
rows<-data.frame()
for (i in seq(1:10)){
   rows<-cbind(rows,5)
}
results<-cbind(results,rows)
}

```

I get the following error message with my approach above. 

```
Error in match.names(clabs, names(xi)) : 
names do not match previous names

```

Is there an easier way?