print method bug

[RobinHankin]

On the Rstudio console (but not in base R on the terminal, or when executing a reprex), I get this reliably:

> rweyll() * rweyll()
A member of the Weyl algebra:
Error in data.frame(index(S), symbol = " = ", val = printedvalue(elements(coeffs(S)))) : 
  arguments imply differing number of rows: 16360, 1, 1008
In addition: Warning message:
In printedvalue(elements(coeffs(S))) : NAs introduced by coercion
> traceback()
5: stop(gettextf("arguments imply differing number of rows: %s", 
       paste(unique(nrows), collapse = ", ")), domain = NA)
4: data.frame(index(S), symbol = " = ", val = printedvalue(elements(coeffs(S))))
3: print_spray_matrixform(x)
2: print.weyl(x)
1: (function (x, ...) 
   UseMethod("print"))(x)
> 

The reprex works fine. And the command works fine on the terminal. The problem is in print_spray_matrixform(), and the issue is spray::printedvalue(), I think.