x <- dnorm(-200:200/100) # Mocking up a profile.
windows <- GRanges("chrA", IRanges(1, 50)) # Making up some windows.
wwhm(x, windows)
wwhm(x, windows, ext=50)
wwhm(x, windows, proportion=0.2)
# Need to set 'rlen' if ext=NA.
wwhm(x, windows, ext=NA, rlen=10)
Run the code above in your browser using DataLab