Korean lesson 1

My teacher's notes:

ne -yes

aniyo -no

Seon saeng nim - teacher

Gae - dog

nae gae nun (my dog is)

nae - my

ne- yes

Mi guk e sarayeo? -do you live in America?

Nae yi utseun Han guk saram imnida

mal - language

shwayeo - easy

Nanun gal bi joahaeyo = I like gal bi

Jeo do = me too

Gatayo = the same


My notes:

My name is Kazu

nae ileum-eun kazibnida.

My car is Dodge.

nae chaneun Dodge.



I’m Japanese.

naneun ilbon salam-ibnida

I’m Korean.

jeoneun hangug salam-ibnida.




Sanzenim (teacher) hangug

De= Yes

Anyo = No




KEE (Dog)





I live in America.

naneun migug-e sal-a.


I live in Japan.

naneun ilbon-e sanda.



My wife is American.

je anaeneun migug-in-ibnida.



We have one son.  He is 19 years old.

adeul-i hana issseubnida.geuneun 19 (shukko?) sal-ibnida.



My hobby is guitar.  I enjoy music.



Ne iyut

My neighbor


Nae yi utseun Han guk saram imnida



Hangul mae


Shiwayo easy


I like



Nanun gal bi joahaeyo


Jeo do



Nanun gal bi joahaeyo



Onu (which)


TO = more



ILBONO Japanese







Recoding in R


# For character values, recode values with named arguments only. Unmatched # values are unchanged. char_vec <- sample(c("a", "b", "c"), 10, replace = TRUE) recode(char_vec, a = "Apple")
#> [1] "Apple" "b" "Apple" "b" "c" "Apple" "c" "c" "b" #> [10] "Apple"
recode(char_vec, a = "Apple", b = "Banana")
#> [1] "Apple" "Banana" "Apple" "Banana" "c" "Apple" "c" "c" #> [9] "Banana" "Apple"


My example:

court2qe$abc,"this is" = "X",
"That is" = "Y")

SAS PROC SQL -- merging and calculation

proc sql ;
create table new as
select a._Material_Substance_Use_Abuse,
(a._1_Yes+a._2_No) as total_n, a._1_Yes as Yes_n, a._2_No as No_n,
a._3_Section_not_available as No_no_section,
(a._1_Yes/(a._1_Yes+a._2_No)) as YES_percentage_wo_sec,
(a._1_Yes/(a._1_Yes+a._2_No+a._3_Section_not_available)) as YES_percentage_w_sec
from Eye_twoT1 AS a