Kes ve etiket/sonları uzunluk çatışma

Question

Bir barplot histogram verilerini hazırlık ama benim etiketler ve sonları arasında görünen tutarsızlık içine çalışmasını sağlamak için kesme fonksiyonu ile çalışıyorum

:

Error in cut.default(sample(1:1e+05, 500, T), breaks = sq, labels = sprintf("$%.0f", : labels/breaks length conflict İşte

bir örnektir . Gelir verileriymiş gibi davranıyorum, 10,000 dolarlık bidonlarda 100 ila 100.000 arası bir dizi kullanıyor. Aynı değişkenleri, etiket tarafında küçük biçimlendirmeler yaparak hem kopukluk hem de etiket oluşturmak için kullanıyorum. Bir karakter vektörü ile karşılaştırıldığında bazı nedenlerin farklı uzunluklara sahip olabileceğini sanıyordum, ama yine de aynı uzunluğa sahip görünüyorlar.

> sq<-seq(0,100000,10000) 
> cut(sample(1:100000, 500, T),breaks=sq,labels=sprintf("$%.0f",sq)) 
> length(sprintf("$%.0f",sq)) 
[1] [11] 
> length(sq) 
[1] [11] 

DÜZENLEME: @thelatemail ve @Josh O'Brien'ın önerileri Başına

, bu kodu değişti ve işler çalışma düzeni. cut(sample(1:100000, 500, T),breaks=sq,labels=sprintf("$%.0f",sq[-1]))

Answer 1

cut() ile, 11 kırma, yalnızca 10 etiket gerektiren 10 seviyeyi sınırlar. "labels/breaks length conflict" hatası, sprintf() numaralı aramanın labels= bağımsız değişkenine çok fazla etiket sağladığını bildiriyor. kodda

:

breaks <- 0:10/10 
dat <- runif(1e4) 

length(breaks) 
# [1] 11 
length(levels(cut(breaks, sq))) 
# [1] 10