dip_class_plot Error

[mahmutoezmen]

dip_class_plot Error

[johnschwenck]

Thanks for sending this over, I'll take a look and get back to you shortly.Sent from my T-Mobile 5G Device -------- Original message --------From: Mahmut Ozmen ***@***.***> Date: 10/6/22 9:35 AM (GMT-05:00) To: johnschwenck/bp ***@***.***> Cc: John Schwenck ***@***.***>, Comment ***@***.***> Subject: Re: [johnschwenck/bp] dip_class_plot Error (Issue #11) Hi, I am using the latest version of R, Rtools, and Rstudio. I have used the bp_hypnos dataset which is availanle in your bp package. Here is the code snippet I am using. Thanks, library(ggplot2) library(bp) library(readr) library(bp) #Load bp_hypnos data(bp_hypnos) #Process bp_hypnos hypnos_proc <- process_data(bp_hypnos, sbp = 'syst', dbp = 'diast', date_time = 'date.time', hr = 'hr', pp = 'PP', map = 'MaP', rpp = 'Rpp', id = 'id', visit = 'Visit', wake = 'wake') #> 2 values exceeded the DUL or DLL thresholds and were coerced to NA dip_class_plot(hypnos_proc) #Error in check_aesthetics(): #! Aesthetics must be either length 1 or the same as the data (1): colour, shape, x and y #Run rlang::last_error() to see where the error occurred. —Reply to this email directly, view it on GitHub, or unsubscribe.You are receiving this because you commented.Message ID: ***@***.***>

[johnschwenck]

Hi,Can you send code and/or data you are using so that I reproduce the error?Thank you,JohnSent from my T-Mobile 5G Device -------- Original message --------From: Mahmut Ozmen ***@***.***> Date: 10/6/22 5:53 AM (GMT-05:00) To: johnschwenck/bp ***@***.***> Cc: Subscribed ***@***.***> Subject: [johnschwenck/bp] dip_class_plot Error (Issue #11) Hi, I am traying to re-create the plots I have seen in your publication using bp_hypnos data that is already in bp package. However, when I use either dip_class_plot(hypnos_proc) or dip_class_plot(hypnos_proc, subj = 70417), I get the following error: Error in check_aesthetics(): ! Aesthetics must be either length 1 or the same as the data (1): colour, shape, x and y Run rlang::last_error() to see where the error occurred. Do you know any work around this issue? I tried debugging, but it did not solve the issue as I am not much experienced with R. —Reply to this email directly, view it on GitHub, or unsubscribe.You are receiving this because you are subscribed to this thread.Message ID: ***@***.***>

[mahmutoezmen]

Hi,
I am using the latest version of R, Rtools, and Rstudio. I have used the bp_hypnos dataset which is availanle in your bp package. Here is the code snippet I am using.

Thanks,

library(ggplot2)
library(bp)
library(readr)

library(bp)

#Load bp_hypnos
data(bp_hypnos)

#Process bp_hypnos
hypnos_proc <- process_data(bp_hypnos,
sbp = 'syst',
dbp = 'diast',
date_time = 'date.time',
hr = 'hr',
pp = 'PP',
map = 'MaP',
rpp = 'Rpp',
id = 'id',
visit = 'Visit',
wake = 'wake')
#> 2 values exceeded the DUL or DLL thresholds and were coerced to NA

dip_class_plot(hypnos_proc)
#Error in check_aesthetics():
#! Aesthetics must be either length 1 or the same as the data (1): colour, shape, x and y
#Run rlang::last_error() to see where the error occurred.

[johnschwenck]

Hi Mahmut,
I just tried recreating your error and it seems to work fine on my end. Are you still having issues? The error that you received is a ggplot error that occurs when there is a mismatch in the input data. Could you try restarting R and clear the workspace and try again? Let me know if this fixes your issue.

`library(bp)
data("bp_hypnos")

hypnos_proc <- process_data(bp_hypnos,
sbp = 'syst',
dbp = 'diast',
date_time = 'date.time',
hr = 'hr',
pp = 'PP',
map = 'MaP',
rpp = 'Rpp',
id = 'id',
visit = 'Visit',
wake = 'wake')

dip_class_plot(hypnos_proc)`

[mahmutoezmen]

Hi John,

I tried the script yo have sent, but I keep getting the same error though I have restarted my R and cleared the workspace.