Texas Covid 19

## function (x, arr.ind = FALSE, useNames = TRUE) 
## {
##     wh <- .Internal(which(x))
##     if (arr.ind && !is.null(d <- dim(x))) 
##         arrayInd(wh, d, dimnames(x), useNames = useNames)
##     else wh
## }
## <bytecode: 0x0000000013145a20>
## <environment: namespace:base>