r - によって検出されたベクトル インデックスによる行列インデックスの塗りつぶし

Question

    C<-c(1,3,4,5,5,5,6,4,6)         
    result<-which(C>5,arr.in=TRUE)

条件が真の場合、インデックスを返します。

7 と 9 が true になる

これらのインデックスを 1 または 0 としてマトリックスに格納する必要があります。たとえば、C の値を任意に変更してこのコードを 5 回反復すると、マトリックスの最終結果は次のようになります。

    0 0 0 0 0 0 1 0 1
    1 0 0 1 0 0 0 1 0
    0 0 0 0 1 0 0 1 1
    1 1 1 0 0 0 1 1 0
    0 0 0 0 0 0 1 0 0

助けてください