line_bearing bidirectional returns the same result

[mem48]

line_bearing(l, bidirectional= T) and line_bearing(l, bidirectional = F) return the same result

bearingT =  line_bearing(l, bidirectional= T)
bearingF =  line_bearing(l, bidirectional = F)

bearingT == bearingF
[1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE

[Robinlovelace]

Thanks for reporting.

Another reproducible example, using the example data:

library(stplanr)
lb1 = line_bearing(flowlines, bidirectional = T)
lb2 = line_bearing(flowlines, bidirectional = F)
identical(lb1, lb2) # TRUE
plot(lb1, lb2)

My interpretation: The Y axis should not be negative - an easy fix I think.