I know how to generate a DAG.

```
library(pcalg)
dag <- randDAG(10, 1, "er")
```

But now I need to get the adjacency matrix of the above dag. I guess there exists such a function but I don't know what it is.

The chatgpt give me the false result:

```
# Get the adjacency matrix from the DAG
adjacency_matrix <- amat(dag)
# Print or inspect the adjacency matrix
print(adjacency_matrix)
```

But unfortunately, Error in amat(dag) : could not find function "amat"