I have mad a for loop to try and output values which i have named spectrum.  However, I cannot seem to get the answers to come out as a vector which is what i need. They come out as separate values which I am then unable to join together. Thank you

for(f in seq(0,0.5,0.1)) {
	sigmasqaured <- 1
	i = complex(real = 0, imaginary = 1) 
	spectrum <- (sigmasqaured)/(abs(1-2.7607*exp(2*pi*i*f)+3.8106*exp(4*pi*i*f)-2.6535*exp(6*pi*i*f)+0.9258*exp(8*pi*i*f))^2)
	  print(spectrum)
}
	[[alternative HTML version deleted]]

