tweaked_IDs {rabi} | R Documentation |
Tweakable brute force color coding scheme generator
Description
Generates "color" coding schemes used to mark and identify individual animals, given a list of numeric sequences. The codes are robust to an arbitrary number of partial code erasures. This method uses a sloppy, slow, stochastic brute force method.
Usage
tweaked_IDs(combos, redundancy, num.tries = 10, available.colors = NULL)
Arguments
combos |
a list of numeric sequences or a matrix where each row is a unique sequence. The length of the sequences or the width matrix corresponds to the |
redundancy |
the number of erasures that can occur without disrupting surety of unique identification. This value determines how robust the scheme is to erasures. |
num.tries |
the number of iterations that will be run before choosing the best option. Increasing this number increases the running time. |
available.colors |
an optional list of strings that contains the names of the unique markings which compose the given 'alphabet' (e.g. "blue", "red", "yellow", etc.). If left blank, the mapping can be done at any later time using |
Details
tweaked_IDs
runs pretty much the same as brute_IDs
. However, unlike brute_IDs
, tweaked_IDs
must be first given a list or matrix of acceptable ID sequences. Instead of randomly pruning down a list of ALL possible ID sequences, we can specify our constraints first and then generate the final ID scheme. This allows the user, in the face of some constraints, to potentially generate more unique IDs that otherwise available.
However, the iterative pruning is done randomly, so it is likely that resulting list of codes does not contain the maximum possible number of robust codes. Thus, the process is repeated multiple times (num.tries
) and the list that contains the largest number of robust codes is kept and returned.
Value
a list of unique ID codes that fit the provided parameters.
If an appropriate argument for available.colors
is provided, each code will be a sequence of strings, otherwise, each code will be a sequence of numeric values.
Note
This function is aimed at more advanced users. We would suggest using other functions to generate ID lists unless you are familiar with how the rabi
package works.
Author(s)
Andrew Burchill, andrew.burchill@asu.edu
References
Burchill, A. T., & Pavlic, T. P. (2019). Dude, where's my mark? Creating robust animal identification schemes informed by communication theory. Animal Behaviour, 154, 203-208. doi:10.1016/j.anbehav.2019.05.013
See Also
brute_IDs
. Also see the vignette loosebirdtag
for demonstrations and additional uses.
Examples
alphabet <- 8 # the number of colors or symbols we have
total.length <- 5 # the number of positions we want mark
redundancy <- 2 # how many marks we can lose but still ID perfectly
#Create a function for determining odd or even
odd <- function(x){ x %% 2 == 1 }
#Create a matrix of all possible sequences
perms <- rep(list(seq_len(alphabet)),total.length)
combos <- as.matrix(expand.grid(perms)) - 1
#Only keep sequences that fit our constraints.
#We want the first position to only be odd numbers
#and the second position to only be even.
combos <- combos[which(odd(combos[,1]) & !odd(combos[,2])), ]
## Not run:
codes <- tweaked_IDs(combos, redundancy, num.tries = 1)
print(paste0("The 'tweaked' list contains ", length(codes), " unique IDs."))
## End(Not run)