## Examples of synthetized voxel diffusion glyphs, ODF glyphs,
## and vMF fiber orientation mapping
##
## noise-free simulations and vMF estimation (2 directions)
angles <- c(20,110); b <- 1500
simulglyph.vmf(angles=angles,b=b)
## 2 direction, lower crossing-angles, higher b
angles <- c(20,80); b <- 3000
simulglyph.vmf(angles=angles,b=b)
## 2 direction, low croosing angle
angles <- c(20,65); b <- 3000
simulglyph.vmf(angles=angles,b=b)
## 3 directions
angles <- c(20,80,140); b <- 3000
simulglyph.vmf(angles=angles,b=b)
# 3 directions
angles <- c(0,60,120); b <- 3000
simulglyph.vmf(angles=angles,b=b)
##------------------
## noisy simulations and vMF estimation
angles <- c(20,110); b <- 1500; sigma <- 0.033
simulglyph.vmf(angles=angles,b=b, sigma=sigma)
# 2 direction, lower crossing-angles, higher b
angles <- c(20,80); b <- 3000; sigma <- 0.033
simulglyph.vmf(angles=angles,b=b, sigma=sigma)
## 2 direction, low croosing angle
angles <- c(20,65); b <- 3000; sigma <- 0.033
simulglyph.vmf(angles=angles,b=b, sigma=sigma)
# 3 directions
angles <- c(20,80,140); b <- 3000; sigma <- 0.033
simulglyph.vmf(angles=angles,b=b, sigma=sigma)
# 3 directions
angles <- c(0,60,120); b <- 3000; sigma <- 0.033
simulglyph.vmf(angles=angles,b=b, sigma=sigma)Run the code above in your browser using DataLab