在[-1，1]範圍內生成隨機數組

Question

我試圖在二維數組中的Fortran [-1，1]範圍內生成隨機數。我知道爲了生成-1和1範圍內的隨機數字，我必須將數字重新調整爲[0,2），但我沒有得到如何填充x(10,10)與randomReal。這裏是代碼

program random 
implicit none 
real :: rnd, randomReal 
real, dimension (10,10) :: x 
integer :: L, i 
L = 10   ! length of sequence 
do i = 1, L 
    call random_number(rnd) 
    randomReal = 2*rnd-1 
    print *, "random real = ", randomReal 


end do 
     write(*,*) (x(L,L), L=1,10) ! assign random numbers to matrix x 
     call random_number(x) 
    end program random 

任何人都可以給我一些關於我的問題的建議嗎？

Answer 1

按照Random array/matrix intitialisation in Fortran（你看了嗎？），你可以做

call random_number(x) 
x = 2*x - 1 

順便說一句，這個數字將是區間[-1,1)，不[-1,1]。