R 用于在数据帧中匹配数字和小数的正则表达式

我在一个数据框中有一个列，该列后面有数字和小数，我希望删除这些数字，使其更加整洁和可排序。如何删除这些数字小数

a<-c("12. one", "1. blah", "189. hi")
b<-c(a,b,c)

df<-data.frame(a,b)

---

a我们可以使用
sub
匹配一个或多个数字，后跟一个数字和字符串开头（
^
）的任何空格，替换为空白（
“
）

或者，如果点、数字的顺序不同，则使用图案匹配0或更多数字，点后跟任何空格，替换为空白（
“”
）

sub("^\\d+\\.\\s*", "", a)
#[1] "one"  "blah" "hi"  

sub("^[0-9.]*\\s?", "", a)