Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
14
Task/Averages-Mean-angle/Stata/averages-mean-angle.stata
Normal file
14
Task/Averages-Mean-angle/Stata/averages-mean-angle.stata
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
mata
|
||||
function meanangle(a) {
|
||||
return(arg(sum(exp(C(0,a)))))
|
||||
}
|
||||
|
||||
deg=pi()/180
|
||||
|
||||
meanangle((350,10)*deg)/deg
|
||||
-1.61481e-15
|
||||
meanangle((90,180,270,360)*deg)/deg
|
||||
0
|
||||
meanangle((10,20,30)*deg)/deg
|
||||
20
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue