Skip to contents
library(saferTool2)


Datasets

codon1 <- "atg"
codon2 <- "tga"
codon3 <- "ctt"
codon4 <- "aga"
codon5 <- "tat"
codon6 <- "gcc"
codon7 <- "cgg"
codon8 <- "agg"
codon9 <- "ttt"
codon10 <- "aaa"
codon11 <- "xyz"


Datasets info

codon1
> [1] "atg"
codon2
> [1] "tga"
codon3
> [1] "ctt"
codon4
> [1] "aga"
codon5
> [1] "tat"
codon6
> [1] "gcc"
codon7
> [1] "cgg"
codon8
> [1] "agg"
codon9
> [1] "ttt"
codon10
> [1] "aaa"
codon11
> [1] "xyz"


Argument data

codon2aa(data = codon1)
> [1] "M"
codon2aa(data = codon2)
> [1] "stop"
codon2aa(data = codon3)
> [1] "L"
codon2aa(data = codon4)
> [1] "R"
codon2aa(data = codon5)
> [1] "Y"
codon2aa(data = codon6)
> [1] "A"
codon2aa(data = codon7)
> [1] "R"
codon2aa(data = codon8)
> [1] "R"
codon2aa(data = codon9)
> [1] "F"
codon2aa(data = codon10)
> [1] "K"


Argument safer_check

codon2aa(data = codon1, safer_check = TRUE)
> [1] "M"
codon2aa(data = codon2, safer_check = TRUE)
> [1] "stop"
codon2aa(data = codon3, safer_check = TRUE)
> [1] "L"


All the arguments

codon2aa(data = codon1, display = TRUE, safer_check = TRUE)
> , , third = T
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = C
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = A
> 
>      second
> first T   C   A      G     
>     T "L" "S" "stop" "stop"
>     C "L" "P" "Q"    "R"   
>     A "I" "T" "K"    "R"   
>     G "V" "A" "E"    "G"   
> 
> , , third = G
> 
>      second
> first T   C   A      G  
>     T "L" "S" "stop" "W"
>     C "L" "P" "Q"    "R"
>     A "M" "T" "K"    "R"
>     G "V" "A" "E"    "G"
codon2aa(data = codon2, display = FALSE, safer_check = TRUE)
> [1] "stop"
codon2aa(data = codon3, display = TRUE, safer_check = TRUE)
> , , third = T
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = C
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = A
> 
>      second
> first T   C   A      G     
>     T "L" "S" "stop" "stop"
>     C "L" "P" "Q"    "R"   
>     A "I" "T" "K"    "R"   
>     G "V" "A" "E"    "G"   
> 
> , , third = G
> 
>      second
> first T   C   A      G  
>     T "L" "S" "stop" "W"
>     C "L" "P" "Q"    "R"
>     A "M" "T" "K"    "R"
>     G "V" "A" "E"    "G"
codon2aa(data = codon4, display = FALSE, safer_check = TRUE)
> [1] "R"
codon2aa(data = codon5, display = TRUE, safer_check = TRUE)
> , , third = T
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = C
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = A
> 
>      second
> first T   C   A      G     
>     T "L" "S" "stop" "stop"
>     C "L" "P" "Q"    "R"   
>     A "I" "T" "K"    "R"   
>     G "V" "A" "E"    "G"   
> 
> , , third = G
> 
>      second
> first T   C   A      G  
>     T "L" "S" "stop" "W"
>     C "L" "P" "Q"    "R"
>     A "M" "T" "K"    "R"
>     G "V" "A" "E"    "G"
codon2aa(data = codon6, display = FALSE, safer_check = TRUE)
> [1] "A"
codon2aa(data = codon7, display = TRUE, safer_check = TRUE)
> , , third = T
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = C
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = A
> 
>      second
> first T   C   A      G     
>     T "L" "S" "stop" "stop"
>     C "L" "P" "Q"    "R"   
>     A "I" "T" "K"    "R"   
>     G "V" "A" "E"    "G"   
> 
> , , third = G
> 
>      second
> first T   C   A      G  
>     T "L" "S" "stop" "W"
>     C "L" "P" "Q"    "R"
>     A "M" "T" "K"    "R"
>     G "V" "A" "E"    "G"
codon2aa(data = codon8, display = FALSE, safer_check = TRUE)
> [1] "R"
codon2aa(data = codon9, display = TRUE, safer_check = TRUE)
> , , third = T
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = C
> 
>      second
> first T   C   A   G  
>     T "F" "S" "Y" "C"
>     C "L" "P" "H" "R"
>     A "I" "T" "N" "S"
>     G "V" "A" "D" "G"
> 
> , , third = A
> 
>      second
> first T   C   A      G     
>     T "L" "S" "stop" "stop"
>     C "L" "P" "Q"    "R"   
>     A "I" "T" "K"    "R"   
>     G "V" "A" "E"    "G"   
> 
> , , third = G
> 
>      second
> first T   C   A      G  
>     T "L" "S" "stop" "W"
>     C "L" "P" "Q"    "R"
>     A "M" "T" "K"    "R"
>     G "V" "A" "E"    "G"
codon2aa(data = codon10, display = FALSE, safer_check = TRUE)
> [1] "K"


Error example

codon2aa(data = codon11, display = FALSE, safer_check = TRUE)
> Error: 
> 
> ================
> 
> ERROR IN codon2aa() OF THE saferTool2 PACKAGE
> data ARGUMENT MUST BE A STRING OF THREE CHARACTERS OR A VECTOR OF THREE CHARACTERS, MADE OF "A", "C", "G", "T" ONLY
> 
> ================
codon2aa(data = codon11, display = TRUE, safer_check = TRUE)
> Error: 
> 
> ================
> 
> ERROR IN codon2aa() OF THE saferTool2 PACKAGE
> data ARGUMENT MUST BE A STRING OF THREE CHARACTERS OR A VECTOR OF THREE CHARACTERS, MADE OF "A", "C", "G", "T" ONLY
> 
> ================