---
title: "家庭動態社會調查主樣本的生活滿意度"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    source_code: embed
---

```{r}
load("psfdPlot.Rda")
load("psfddata.Rda")
load("psfdPlot2.Rda")
load("psfddata2.Rda")
```

主樣本波次(1~5)
=====================================

Column {.tabset .tabset-fade}
-------------------------------------

### happy & life
    
```{r}
graph$happylife
```

### health & Shealth

```{r}
graph$health
```

### eco & work

```{r}
graph$work
```

### family & marry

```{r}
graph$family
```

1930~2000(每十年一波次)
=====================================  

Column {.tabset .tabset-fade}
-------------------------------------

### happy & life
    
```{r}
graph$happylife10
```

### health & Shealth

```{r}
graph$health10
```

### eco & work

```{r}
graph$work10
```

### family & marry

```{r}
graph$family10
```
   
每年度的主樣本
=====================================     

Column {.tabset .tabset-fade}
-------------------------------------

### happy
    
```{r}
graph2$happyp2
```

### life

```{r}
graph2$lifep2
```

### health

```{r}
graph2$healthp2
```

### Shealth

```{r}
graph2$Shealthp2
```

### eco

```{r}
graph2$eco_satis2
```

### work

```{r}
graph2$work_satis2
```

### family

```{r}
graph2$family_satis2
```

### marry

```{r}
graph2$marry_satis2
```