r - R度数表の生成

Question

私はこのようなサンプルベクトルを持っています:

v <- c(1, 2, 1, 3, 2, 3, 3, 4, 1, 4)

私が取得したいのは、数値の頻度とそれに続く別の数値を教えてくれる頻度表です。

出力：

  1 2 3 4
1 0 1 0 1
2 1 0 1 0
3 1 1 1 0
4 1 0 1 0

そして、パーセンテージで同じ値。