Element-wise sin(x)/x function

Symbolic element-wise sin(x)/x function for LazyTensor objects or standard element-wise sin(x)/x function otherwise.

Usage

sinxdivx(x)

Arguments

x

input for sinxdivx.default() or sinxdivx.LazyTensor().

Value

See value of sinxdivx.default() or sinxdivx.LazyTensor()

Details

If x is a LazyTensor, see sinxdivx.LazyTensor(), else see sinxdivx.default().

Note: by convention sinxdivx(0) returns 1.

See also

sinxdivx.default(), sinxdivx.LazyTensor()

Author

Chloe Serre-Combe, Amelie Vernay

Examples

if (FALSE) {
# Numerical input
sinxdivx(4)
sinxdivx(1:10)
# LazyTensor symbolic element-wise `sin(x)/x`
x <- matrix(runif(150 * 3), 150, 3) # arbitrary R matrix, 150 rows, 3 columns
x_i <- LazyTensor(x, index = 'i')   # creating LazyTensor from matrix x, 
                                    # indexed by 'i'
sindiv_x <- sinxdivx(x_i)           # symbolic matrix, 150 rows and 3 columns
}