'Extract input of a function in R

I wonder if there might be a way to extract the input value (1:3) used in a after running object a?

library(clubSandwich)

a <- constrain_equal(1:3)

Desired output: vector 1:3


Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source