3280_project
Yuchen Shi
2024-11-22
The global shift toward electric vehicles (EVs) has been gaining
momentum in recent years, driven by a combination of environmental
concerns, government policies, and technological advancements. As
nations aim to reduce greenhouse gas emissions and combat climate
change, the adoption of EVs has become a critical component of
transportation strategies worldwide. According to the International
Energy Agency (IEA), the number of electric cars on the road surpassed
10 million in 2020, with substantial growth expected in the coming
decades (IEA, 2021). Several factors contribute to the boom of electric
vehicles, including government policies such as gas taxes, which can
drive consumers toward cleaner alternatives, and the increasing number
of EV charging ports, which directly impact consumer confidence in EVs
(Sierzchula et al., 2014). Additionally, the ratio of charging ports to
chargers has been an important metric in determining infrastructure
adequacy, influencing the accessibility of EVs. Other factors such as
gas prices and air quality have also shown to impact EV adoption, as
higher gas prices and poor air quality encourage consumers to consider
EVs as more environmentally friendly options (Karakaya et al., 2019).
Furthermore, the region, median household income, and political leaning
of an area can shape both policy decisions and consumer preferences. To
explore these dynamics, I gathered data from sources such as World
Population Review, Data.gov, and the Bureau of Economic Analysis (BEA),
which provide valuable insights into factors such as gas prices,
charging infrastructure, income levels, and regional differences. This
blog will examine how these variables interact to influence the ongoing
rise of electric vehicles.
## Warning: 'layout' objects don't have these attributes: 'colorbar'
## Valid attributes include:
## '_deprecated', 'activeshape', 'annotations', 'autosize', 'autotypenumbers', 'calendar', 'clickmode', 'coloraxis', 'colorscale', 'colorway', 'computed', 'datarevision', 'dragmode', 'editrevision', 'editType', 'font', 'geo', 'grid', 'height', 'hidesources', 'hoverdistance', 'hoverlabel', 'hovermode', 'images', 'legend', 'mapbox', 'margin', 'meta', 'metasrc', 'modebar', 'newshape', 'paper_bgcolor', 'plot_bgcolor', 'polar', 'scene', 'selectdirection', 'selectionrevision', 'separators', 'shapes', 'showlegend', 'sliders', 'smith', 'spikedistance', 'template', 'ternary', 'title', 'transition', 'uirevision', 'uniformtext', 'updatemenus', 'width', 'xaxis', 'yaxis', 'barmode', 'bargap', 'mapType'plotly1
## Warning: `line.width` does not currently support multiple values.
## Warning: `line.width` does not currently support multiple values.
## Warning: `line.width` does not currently support multiple values.
## Warning: `line.width` does not currently support multiple values.## Warning in p$x$data[firstFrame] <- p$x$frames[[1]]$data: number of items to
## replace is not a multiple of replacement length