TF error with negative gain

[jhenttonen]

Both TF("-1/s") and TF("1/(-s)") give error (R 3.6.1)

Error in args[[2]] : subscript out of bounds