@echo off setlocal :: Prompt user for input file names set /p jpgfile="Enter the name of the JPG file: " set /p archive="Enter the name of the 7z file: " set /p output="Enter the name of the output JPG file: " :: Embed the archive in the JPG copy /B "%jpgfile%"+"%archive%" "%output%" echo Operation completed! pause
Wednesday, May 14, 2025
An example of a bat file that shows dialogues
Friday, March 21, 2025
Monday, October 14, 2024
My experience with Cherie Lorraine ASMR therapy.
Cherie Lorraine ASMR has become a beacon of comfort for many, including myself. Her soothing videos have played a significant role in helping me manage anxiety and trauma stemming from a tragic accident. This connection to ASMR (Autonomous Sensory Meridian Response) highlights its potential as a therapeutic tool, albeit not a substitute for professional therapy.
Understanding ASMR
ASMR refers to a tingling sensation often experienced in response to specific auditory or visual stimuli, such as whispering, tapping, or gentle movements. This phenomenon can induce profound relaxation and has been linked to various benefits, including:
- Reduced Anxiety: Many individuals report feeling calmer and less anxious after engaging with ASMR content. This effect is thought to stem from the activation of the brain's reward pathways, which can lower cortisol levels and promote relaxation.
- Improved Sleep: ASMR is commonly used as a sleep aid, helping people fall asleep faster and achieve deeper rest by triggering relaxation responses in the brain.
- Enhanced Mood: The pleasurable sensations associated with ASMR can elevate mood and provide temporary relief from symptoms of depression.
Cherie Lorraine's Unique Approach
Cherie Lorraine utilizes a variety of techniques to create her signature tingling sounds. Her content often features:
- Whispering: A common trigger for many ASMR enthusiasts, whispering can create an intimate atmosphere that enhances the sensory experience.
- Tapping and Scratching: These sounds are known to produce calming effects and can help viewers focus on the present moment, contributing to mindfulness.
- Visual Triggers: Cherie's use of gentle movements and visual cues further engages viewers, making her videos not only auditory experiences but also visually soothing.
Recommended Videos
To explore Cherie's work further, consider these standout videos that exemplify her professional approach to ASMR:
- "Personal attention for deep sleep" - A calming session featuring gentle whispers and soft sounds designed for stress relief. https://www.youtube.com/watch?v=--6Xet7iOA0
- "Tapping & Scratching for Sleep" - A video focused on tapping and scratching sounds that effectively promote relaxation and sleep. https://youtu.be/1VOUlktcBsw?si=TYhLo-PNTZCf86R0
- "Personal Attention ASMR" - An immersive experience where Cherie engages in personal attention triggers that enhance feelings of comfort. https://www.youtube.com/watch?v=mnkC6XHOU9c
The Therapeutic Role of ASMR
While ASMR can significantly contribute to well-being, it is essential to note that it is not a replacement for full therapy. Instead, it can serve as a complementary tool that supports mental health by:
- Facilitating Mindfulness: Engaging with ASMR content encourages viewers to focus on sensory experiences, which can help mitigate anxiety and improve emotional regulation.
- Providing Temporary Relief: For those dealing with chronic pain or stress-related conditions, ASMR may offer temporary distraction and relief, enhancing overall quality of life.
Conclusion
In conclusion, Cherie Lorraine ASMR's work exemplifies the therapeutic potential of ASMR in addressing anxiety and trauma. By incorporating keywords related to ASMR, therapy, healing, and mental wellness, we can help her content reach more individuals seeking solace through this unique sensory experience. Cherie's videos not only entertain but also provide valuable support for those navigating their mental health journeys.
Monday, November 16, 2020
Excess mortality - exercises with ggplot2 (faceting and plots imposed on each other).
pacman::p_load(covdata, tidyverse, ggrepel, slider, lubridate, gghighlight)
## Convenince "Not in" operator
"%nin%" <- function(x, y) {
return( !(x %in% y) )
}Load mortality data
demo_r_mweek3_1_Data <- read_csv(
"data/demo_r_mwk_ts_1_Data_2020-11-16.csv",
col_types = cols(
SEX = col_skip(),
UNIT = col_skip(),
Value = col_character(),
`Flag and Footnotes` = col_skip()
),
locale = locale(grouping_mark = " ", encoding = "WINDOWS-1252")
) %>%
mutate(GEO = case_when(
GEO == "Germany (until 1990 former territory of the FRG)" ~ "Germany",
TRUE ~ GEO
))
pop <- tibble::tribble(
~iso3, ~iso2, ~GEO, ~pop,
"HRV", "HR", "Croatia", 4076246L,
"CZE", "CZ", "Czechia", 10649800L,
"EST", "EE", "Estonia", 1324820L,
"FRA", "FR", "France", 67012883L,
"DEU", "DE", "Germany", 83019213L,
"LTU", "LT", "Lithuania", 2794184L,
"ROU", "RO", "Romania", 19414458L,
"LVA", "LT", "Latvia", 1919968L,
"POL", "PL", "Poland", 37972812L,
"HUN", "HU", "Hungary", 9772756L,
"SRB", "RS", "Serbia", 6963764L,
"SVK", "SK", "Slovakia", 5450421L,
"ESP", "ES", "Spain", 46758917L,
"ITA", "IT", "Italy", 60317116L
) df <- demo_r_mweek3_1_Data %>%
# janitor::clean_names() %>%
# separate(freq_sex_unit_geo_time_period,into = c("freq","sex","unit","iso2"), sep = ";") %>%
# pivot_longer(cols= starts_with("x"), names_to = "TIME", values_to = "VALUE" ) %>%
mutate(VALUE = gsub(x = Value, pattern = '[^0-9\\.]', '', perl = TRUE) %>% as.numeric() ) %>%
select(-Value) %>%
mutate(TIME_week = str_sub(TIME, 6,7) %>% as.numeric(),
TIME_year = str_sub(TIME, 1,4) %>% as.numeric()) %>%
filter(!is.na(VALUE)) %>%
# group_by(iso2, TIME, TIME_year, TIME_week) %>%
# summarise(VALUE = sum(VALUE)) %>%
inner_join(pop) %>%
group_by(iso2) %>%
mutate(end_label = if_else(TIME == dplyr::last(TIME), iso2, " ")) %>%
ungroup() %>%
filter(TIME_week != 99) %>%
mutate(mort_per_mil = VALUE/pop * 1000000) ## Joining, by = "GEO" df %>%
ggplot(aes(
x = TIME_week,
y = mort_per_mil,
color = if_else(TIME_year == 2020, "red", "gray"),
group = TIME_year
))+
geom_line() +
facet_wrap(~ GEO) +
theme_minimal() +
theme(legend.position = "none") +
theme(axis.text.x = element_text(angle = 90)) +
labs(
x = "Week",
y = "Mortality per 1 million",
title = "Weekly mortality per 1 million until week 41 (October 17th), 2020",
subtitle = "Data imposed on previous years (gray) 2010-2019",
caption = "Data: hhttps://ec.europa.eu/eurostat/databrowser/view/DEMO_R_MWK_TS__custom_96757/default/table?lang=en"
) +
scale_x_discrete(limits=paste0("W",seq(1,53, by=1)),
breaks=paste0("W",seq(1,53, by=4)))+
scale_color_manual(values = c("lightgray", "red"))
df %>% filter(TIME_year==2020) %>%
mutate(flag = if_else(iso2=="PL", 1, 0)) %>%
ggplot(mapping = aes(x = TIME, y = mort_per_mil,
color = as.factor(flag),
group = GEO
)) +
geom_line(size = 0.5) +
geom_text(aes(x=TIME, label = end_label), point.padding = NA, segment.colour = NA, size = 2.8) +
guides(color = FALSE, size = FALSE, alpha = FALSE) +
# scale_y_log10() +
theme_minimal() +
theme(axis.text.x = element_text(angle = 90)) +
labs(x = "Week",
y = "Mortality per 1 million",
title = "Mortality per 1 million",
subtitle ="Eurostat weekly data until week 41, 2020 (October 17)",
caption = "Data: https://appsso.eurostat.ec.europa.eu/nui/show.do?dataset=demo_r_mweek3&lang=en") +
scale_color_manual(values = c("lightgrey", "red"))## Warning: Ignoring unknown parameters: point.padding, segment.colour
Subscribe to:
Posts (Atom)