I'm trying to re-create the below graph but am not able to get rid of the 'half-step' increments for x > 3. Is there a better way of doing this? I'm using `ggplot2` for now - to get it right and then plan on switching to `plotly` for interactive plots.

**Code**

Only showing 3 traces for PoC:

```
set.seed(69)
library(data.table)
library(ggplot2)

k <- lapply(1:10, function(z){
  ret <- sample(x = (5*z):100, 
                size = 20, 
                replace = T)
  dat <- data.table(V1 =  ret[order(ret)] )
  colnames(dat) <- paste('trace', z, sep = '')
  return(dat)
  })

dat <- do.call(cbind, k)
dat$size <- c(seq(0.1, 1, 0.1), 2:11)

ggplot(dat[size >= 0.2, ], aes(x = size)) + 
  geom_line(size = 1.5, aes(y = trace1), color = '#003366') + 
  geom_line(size = 1.5, aes(y = trace2), 
            color = rgb(red = 0, green = 103, blue = 62, maxColorValue = 255)) + 
  geom_line(size = 1.5, aes(y = trace3), color = '#b20000') + 
  scale_x_log10(breaks = c(seq(0.1, 1, 0.1), 2:11))

```

**Output**

![](https://i.stack.imgur.com/BOkIn.png)

**Desired Plot**

![](https://i.stack.imgur.com/6Sr5f.png)