> q <- c(v.col[r, 1], v.col[r, 2], v.col[r, 3], 102)
> m <- c(0, 170, 85, 102)
> as.hexmode(m)
[1] "00" "aa" "55" "66"
> as.hexmode(q)
Error in as.hexmode(q) : 'x' cannot be coerced to class "hexmode"
> q
[1]   0 170  85 102
> m
[1]   0 170  85 102
> typeof(q)
[1] "double"
> typeof(m)
[1] "double"
> class(q)
[1] "numeric"
> class(m)
[1] "numeric"