Internal External Matrix Example In R