How to imput a binary relation then transform it into a binary matrix using R

Question

I need to input a binary relation (Exemple:E={1,2,3,4,5,6}) and create a boolean matrix from the relation to be able to test if the relation in an equivalence and an order relat