Show code
# Loading required libraries
library(sf)
library(dplyr)
library(leaflet)
library(htmltools)
library(rnaturalearth)
library(leaflet.extras)
library(janitor)
library(tidyverse)About Me
Traveling
I Love to travel and explore new places! I have been lucky enough to grow up in a family that also enjoys exploring, whether it be regional cities or far away countries. It is still my dream to have a job that gives me the opportunity to travel a couple weeks out of the year. Some of the places I’ve been include the Bahamas, Mexico, New York, and Florida.
An Interactive Map of my Travel Destination
Feel free to toggle on and off the code chunks!
Show code
invisible(Travel <- read_csv("Map2.csv") |> clean_names())
leaflet(data = Travel) %>% #creating leaflet from data
addProviderTiles("Esri.WorldImagery") %>% #backround map
addMarkers(~long, ~latitude, popup = ~place) %>% # Adding markers to locations
addLabelOnlyMarkers(
~long, ~latitude,
label = ~place,
labelOptions = labelOptions(
noHide = TRUE, # makes label always be shown
direction = 'bottom', #Labelled on bottom of marker
textOnly = TRUE,
style = list(
"color" = "white",
"font-size" = "12px",
"font-weight" = "bold"
)
)
)Pets
I am a dog lover, and I will continue to be one for the rest of my life. When I was younger I grew up with two brother Lhasa Ahpsos that were small but mighty. I love how dogs have combine loyalty and constant love, in a way that truly makes them life companions. I currently have a young 4 year old Springer Spaniel named Traviesa, otherwise known as Naughty in english. I love to spend time with her on walks or playing her favorite pass time: fetch.
Hometown
I am a southern Californian at heart, and I grew up in a suburban town called West Covina, or what I like to call-The best Covina. West Covina is a city in Los Angeles county that has a population of about 109,000. West Covina is famous for being the shooting location of the show “Crazy Ex-Girlfriend”, and the movie “Good Burger”.
