o$overunderobj <- t(apply(o$overunderobj,1,sort)) will make the knot diagram unknotted, it would be good to have this implemented as untangle(o) or similar. Actually it would also be good to have overunderobj(o) <- M work as expected (and for that matter having overunderobj(o) work as expected might be good too).
for
oany knot theno$overunderobj <- t(apply(o$overunderobj,1,sort))will make the knot diagram unknotted, it would be good to have this implemented asuntangle(o)or similar. Actually it would also be good to haveoverunderobj(o) <- Mwork as expected (and for that matter havingoverunderobj(o)work as expected might be good too).