powered by
array_factor(wavelength, N, pitch)
S <- array_factor(seq(400, 600), 10, 500) str(S)
Run the code above in your browser using DataLab