Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/0xosiris/curvature_r_package
Curvature of Parametric Curve R Package
https://github.com/0xosiris/curvature_r_package
Last synced: about 1 month ago
JSON representation
Curvature of Parametric Curve R Package
- Host: GitHub
- URL: https://github.com/0xosiris/curvature_r_package
- Owner: 0xOsiris
- License: mit
- Created: 2022-01-25T18:53:38.000Z (about 3 years ago)
- Default Branch: main
- Last Pushed: 2022-05-07T04:37:24.000Z (over 2 years ago)
- Last Synced: 2023-03-10T19:03:40.249Z (almost 2 years ago)
- Language: R
- Size: 28.3 KB
- Stars: 1
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
- License: LICENSE
Awesome Lists containing this project
README
```
_// _//
_// _// _//
_// _// _//_/ _///_// _// _// _/_/ _/_// _//_/ _/// _//
_// _// _// _// _// _// _// _// _// _// _// _// _/ _//
_// _// _// _// _// _// _// _// _// _// _// _// _///// _//
_// _//_// _// _// _/_// _// _// _// _// _// _// _/
_//// _//_//_/// _// _// _/// _// _//_//_/// _////
```# Differential Geometry - R Utility to Calculate Curvature of a Parametric Curve
# Installation Instructions
#### `> library(devtools)`
#### `> install_github("LeytonTaylor/Curvature_R_package");`
#### `> library(CurvatureCalc);`
#### `> curvature(c(expression(1+.5*cos(t),1+.1*sin(t),sin(t))), 1)`
# Usage:
#### `@param alpha A vector of expressions defining the curve`
#### `@param t Evaluation parameter`
#### `@return Scalar value Curvature of alpha at time t`
#### `@details alpha must be a vector of parametric expressions with param 't'`
#### `@examples `
#### `kAlpha <- curvature(c(expression(1+.5*cos(t),1+.1*sin(t),-1)), 1)`
#### `dataSet= matrix(c(expression(1+.5*cos(t),1+.1*sin(t),sin(t))), nrow=1,ncol=3,byrow=TRUE)`
#### `alphaN=dataSet[1,]`
#### `kAlpha<-curvature(alphaN,1)`