回答

おそらく、変数aに文字列が入っていると思います。文字列を抜いて、aを作成していただきますと、相関行列を作成することができると思います。

または、df <- a[sapply(a, is.numeric)]として、データフレームaから文字列を除外したデータフレームdfを作成してcor(df)としても良いかと思います。