Looking at the downward trend of the consistancy of Healthy Sexual Intimacy in America.

This data is the same used in the Tableau Course offered by Couresera

## Warning: package 'plotly' was built under R version 4.1.2

## Loading required package: ggplot2

## Warning: package 'ggplot2' was built under R version 4.1.2

## 
## Attaching package: 'plotly'

## The following object is masked from 'package:ggplot2':
## 
##     last_plot

## The following object is masked from 'package:stats':
## 
##     filter

## The following object is masked from 'package:graphics':
## 
##     layout

## Warning: package 'readxl' was built under R version 4.1.2

The plot highlights the data for frequently sexually intimate couples. And Shows a clear decline