Computes the cosine similarity between numeric vectors

1 | ```
cosine_dist(m)
``` |

`m` |
the data matrix |

Returns the cosine similarity

1 2 3 | ```
a <- c(2, 1, 0, 2, 0, 1, 1, 1)
b <- c(2, 1, 1, 1, 1, 0, 1, 1)
sim <- cosine_dist(rbind(a,b))
``` |

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.

All documentation is copyright its authors; we didn't write any of that.