Dopasowywanie krzywej gęstości do histogramu w R

Muszę zrobić rozciągnięcie histogramu

Histogram ze skalą logarytmiczną i przerwami niestandardowymi

Próbuję wygenerować histogram w R ze skalą logarytmiczną dla y. Obecnie robię:

Jak mogę przyspieszyć tę klasę histogramów?

Ma to na celu obliczenie histogramu 8-bitowego obrazu w skali szarości. Przy testowej bitmapie 1024x770, CreateTime kończy się na około 890ms. Jak mogę to zr...