определить среднее значение по оси гистограммы 0Y

Question

Я рисую гистограммы, используя команду Hist, как показано ниже:

hist(plikTVDI, ylab='częstość występowania',
     xlab=xetyk, col='red', main=etykieta, cex.lab=1.5)

Затем я добавляю текст:

text(x=mean(plikTVDI,na.rm=TRUE),y=40,labels=tekst_srednia_l, cex=3, col='blue')

Есть ли возможность определить, где находится среднее значение оси y (это будет лучше, чем постоянная 40).

Answer 1

Возможно, я не правильно понимаю ваш вопрос, но я думаю, что вы хотели бы определить среднюю точку оси y при создании гистограммы?

Если это так, если вы храните результаты hist в переменной, например:

tmp <- hist(...)

Вы можете получить доступ к значениям счетчика, которые определяют высоту баров, через tmp$counts. Таким образом, средняя точка оси Y будет tmp$counts / 2.

В качестве альтернативы, если вы хотите, чтобы означало высоты столбцов, вы могли бы просто сделать:

mean(tmp$counts)