DZone Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

Snippets has posted 5883 posts at DZone. View Full User Profile

Create An Identity Matrix.

05.26.2005
| 31735 views |
  • submit to reddit
        
> diag(n)

Or the long way:

> n<-c(5)
> I <- matrix(0,nrow=n,ncol=n)
> I[row(I)==col(I)] <- 1