labels(object, ...) ## Default S3 method: labels(object, ...) ## S3 method for class 'dendrogram': labels(object, ...) ## S3 method for class 'dist': labels(object, ...) ## S3 method for class 'lm': labels(object, ...) ## S3 method for class 'glm': labels(object, ...) ## S3 method for class 'terms': labels(object, ...)
object | an object of fitted model, for which a printing or plotting method, or similar function, is to be called. |
... | additional arguments to be passed to or from future functions. |
x <- c(a=11, b=22, c=33) cat("Results were:\n", paste(labels(x), "=", x), "\n") ## Results were: ## a = 11 b = 22 c = 33d <- data.frame(Big=factor((1:20) > 12), Small=factor((1:20) < 8), Y=1:20) labels(d) ## [[1]] ## [1] "1" "2" "3" "4" "5" "6" "7" "8" "9" "10" "11" "12" "13" "14" "15" ## [16] "16" "17" "18" "19" "20" ## ## [[2]] ## [1] "Big" "Small" "Y"
labels(terms(Y ~ Big * Small)) # names of expanded terms ## [1] "Big" "Small" "Big:Small"
labels(lm(Y ~ Big * Small, data=d)) # omits interaction term: coef was NA ## [1] "Big" "Small"
ff.dist <- dist(Sdatasets::fuel.frame[,1:4]) labels(ff.dist) # same as rownames of input to dist() ## [1] "Eagle Summit 4" "Ford Escort 4" ## [3] "Ford Festiva 4" "Honda Civic 4" ## [5] "Mazda Protege 4" "Mercury Tracer 4" ## . ## . ## . ## [59] "Nissan Axxess 4" "Nissan Van 4"
labels(c(1.1, 1.4, 2.0)) # creates labels c("1", "2", "3")