计算自然数的二进制表示形式作为R中的序列

Question

我正在尝试编写一个函数，该函数以0和1的序列计算自然数的二进制表示形式。我这样写：

binary<- function(n)
{if(n > 1) {binary(as.integer(n/2))}
 cat(n%%2)}

我得到的输出为NULL类型。我正在尝试将其转换为整数，以便可以将它们放入向量中，但是遇到了困难。我还尝试将其转换为逻辑类型，但会得到TRUE和FALSE值，但无法将它们转换为0和1并将其放入向量中。有什么想法怎么做吗？