# Get this figure: p = download_plot("https://plotly.com/~MattSundquist/13137/")
# Get this figure's data: data = download_plot("https://plotly.com/~MattSundquist/13137/").plot.data
# Add data to this figure: post(plot(scatter(x=[1, 2], y=[2, 3])); filename="Division of Work in a Typical Workweek", fileopt="extend"))
# Get y data of first trace: y1 = download_plot("https://plotly.com/~MattSundquist/13137/").plot.data[1]["y"]

# Get figure documentation: https://plotly.com/julia/get-requests/
# Add data documentation: https://plotly.com/julia/file-options/

# You can reproduce this figure in Julia with the following code!

# Learn about API authentication here: https://plotly.com/julia/getting-started
# Find your api_key here: https://plotly.com/settings/api

using Plotly
Plotly.signin("username", "api_key")
trace1 = bar(Dict(
  :uid => "e7075d", 
  :name => "Col2_% of Average Workweek, trace1_y, trace2_y", 
  :type => "bar", 
  :x => ["14", "19", "28", "39"], 
  :y => ["Searching and <br>Gathering Information", "Communicating and<br> collaborating internally", "Reading and Answering Email", "Completing Tasks"], 
  :orientation => "h"
))
data = [trace1]
layout = Layout(Dict(
  :title => "Division of Work in a Typical Workweek", 
  :width => 592, 
  :xaxis => Dict(
    :type => "linear", 
    :range => [0, 41.05263157894737], 
    :zeroline => false, 
    :autorange => true, 
    :ticksuffix => "%"
  ), 
  :yaxis => Dict(
    :type => "category", 
    :range => [-0.5, 3.5], 
    :title => "", 
    :zeroline => false, 
    :autorange => true
  ), 
  :height => 433, 
  :margin => Dict(:l => 200), 
  :autosize => true, 
  :showlegend => false
))
p = plot(data, layout)
response = post(p)
plot_url = response.url