Re: [R] parsing a complex file
It is not clear as to how you want to parse the file. You need to at least provide an example of what you expect from the output. You mention " the detail which begins with 2 at byte location 1 to another file"; I don't see the '2' at byte location 1. Jim Holtman Data Munger Guru What is the problem that you are trying to solve? Tell me what you want to do, not how you want to do it. On Sat, Aug 27, 2016 at 4:56 PM, Glenn Schultzwrote: > All, > > I have a complex file I would like to parse in R a sample is described > below > > The header is 1:200 and the detail is 1 to 200. I have written code to > parse the file so far. As follows: > > numchar <- nchar(x = data, type = "chars") > start <- c(seq(1, numchar, 398)) > end <- c(seq(398, numchar, 398)) > quartile <- NULL > final <- str_sub(data, start[1:length(start)], end[1:length(end)]) > quartile <- append(quartile, final) > write(quartile, Result) > data2 <- readLines(Result) > > The function gets me to data2. All is well so far. However, I need to > send the header which begins with 1 at byte location 1 to a file and the > detail which begins with 2 at byte location 1 to another file. When I look > at data2 in RStudio I see the following. The file is 185 meg, I have the > lines but I am stuck as to the next step. Any ideas are appreciated. > > Glenn > > > dput of the data > > "1176552 CL20031031367RBV319920901 > > > 217655208875{08875{08875{08875{08875{08875{22D22D22D22D22D2 > 2D13C13C13C13C13C13C604000{604000{604000{ > 604000{604000{604000{36{36{36{36{36{36{ > 08500{08500{08500{08500{08500{08500{1254240 CL20031031371KLV120020201 > > > 225424007484{07250{07375{07500{07625{08625{33F06H33H33I34{ > 34A02A01I02{02{02A03B0001121957C123500{92{ > 000128{0001741000{0003849000{35I30{36{36{36{36{ > 07000{07000{07000{07000{07000{07000{1254253 CL20031031371KMA620020301 > > > 225425306715{06250{06500{06750{06875{07000{33C23G33C33I34{ > 34A02{01I02{02{02A02C946646A35{85{ > 000103{0001205000{000130{35H30{36{36{36{36{ > 06000{06000{06000{06000{06000{06000{1259455 CL20031031371RE4420020501 > > > 225945507045{06750{06875{07000{07250{07375{34{28B34A34B34B3 > 4C01H01G01H01H01H02C93E36{765000{ > 995000{0001384000{0002184000{35I30{36{36{36{36{ > 06500{06500{06500{06500{06500{06500{1261060 CI20031031371S5V219940101 > > > 226106006637{06500{06500{06625{06750{06875{05B00C04H05I06B0 > 6B11H11G11G11H11H11I0001169090I65{95{ > 000125{0001328000{000190{18{18{18{18{18{18{ > 06000{06000{06000{06000{06000{06000{1335271 CI20031031375HMU519960101 > > > 233527107500{07500{07500{07500{07500{07500{08B06B08E08F08F0 > 8F09D09D09D09D09E09E717375{464000{55{ > 77{0001085500{0001085500{18{18{18{18{18{18{ > 07000{07000{07000{07000{07000{07000{1440840 CL20031031380HV9519981101 > > > 244084006707{06500{06625{06750{06875{06875{27D03C28C29H30{ > 30A06{05I06{06{06{06A615172I25{6 > 21000{673000{75{791000{36{36{36{36{36{36{ > 06000{06000{06000{06000{06000{06000{1521993 CI20031031384E3A62101 > > > 252199306937{06875{06875{06875{07000{07000{12H02H12H13{13D1 > 3E04E04E04E04E04F04F0001129428F70{955000{0001000 > 000{0002087000{0002087000{18{18{18{18{18{18{06500{06500{ > 06500{06500{06500{06500{1538080 CL20031031384YXH42501 > > > 253808008875{08875{08875{08875{08875{08875{31I31I31I31I31I3 > 1I04A04A04A04A04A04A0001419300{0001419300{0001419300{ > 0001419300{0001419300{0001419300{36{36{36{36{36{36{ > 07000{07000{07000{07000{07000{07000{1659123 CI20031031390XG8720020801 > > > 265912306909{06750{06750{06875{07000{07125{16E15I16C16E16F1 > 6F01E01D01D01E01E01G998541G162000{792000{ > 0001156500{000160{000199{18{18{18{18{18{18{ > 06000{06000{06000{06000{06000{06000{" > > > dput data2 > c("1176552 CL20031031367RBV319920901 217655208875{08875{08875{08875 > {08875{08875{22D22D22D22D22D22D13C13C13C13C13C13C604000{ > 604000{604000{604000{604000{604000{36{36{36{36{36{36{ > 08500{08500{08500{08500{08500{08500{", "1254240 CL20031031371KLV120020201 > 225424007484{07250{07375{07500{07625{08625{33F06H33H33I34{ > 34A02A01I02{02{02A03B0001121957C123500{92{ > 000128{0001741000{0003849000{35I30{36{36{36{36{ > 07000{07000{07000{07000{07000{07000{", "1254253 CL20031031371KMA620020301 > 225425306715{06250{06500{06750{06875{07000{33C23G33C33I34{ > 34A02{01I02{02{02A02C946646A35{85{ > 000103{0001205000{000130{35H30{36{36{36{36{ > 06000{06000{06000{06000{06000{06000{", "1259455 CL20031031371RE4420020501 > 225945507045{06750{06875{07000{07250{07375{34{28B34A34B34B34 > C01H01G01H01H01H02C93E36{765000{995000{0001384000{ > 0002184000{35I30{36{36{36{36{06500{06500{06500{06500{06500{06500{", > "1261060 CI20031031371S5V219940101
[R] parsing a complex file
All, I have a complex file I would like to parse in R a sample is described below The header is 1:200 and the detail is 1 to 200. I have written code to parse the file so far. As follows: numchar <- nchar(x = data, type = "chars") start <- c(seq(1, numchar, 398)) end <- c(seq(398, numchar, 398)) quartile <- NULL final <- str_sub(data, start[1:length(start)], end[1:length(end)]) quartile <- append(quartile, final) write(quartile, Result) data2 <- readLines(Result) The function gets me to data2. All is well so far. However, I need to send the header which begins with 1 at byte location 1 to a file and the detail which begins with 2 at byte location 1 to another file. When I look at data2 in RStudio I see the following. The file is 185 meg, I have the lines but I am stuck as to the next step. Any ideas are appreciated. Glenn dput of the data "1176552 CL20031031367RBV319920901 217655208875{08875{08875{08875{08875{08875{22D22D22D22D22D22D13C13C13C13C13C13C604000{604000{604000{604000{604000{604000{36{36{36{36{36{36{08500{08500{08500{08500{08500{08500{1254240 CL20031031371KLV120020201 225424007484{07250{07375{07500{07625{08625{33F06H33H33I34{34A02A01I02{02{02A03B0001121957C123500{92{000128{0001741000{0003849000{35I30{36{36{36{36{07000{07000{07000{07000{07000{07000{1254253 CL20031031371KMA620020301 225425306715{06250{06500{06750{06875{07000{33C23G33C33I34{34A02{01I02{02{02A02C946646A35{85{000103{0001205000{000130{35H30{36{36{36{36{06000{06000{06000{06000{06000{06000{1259455 CL20031031371RE4420020501 225945507045{06750{06875{07000{07250{07375{34{28B34A34B34B34C01H01G01H01H01H02C93E36{765000{995000{0001384000{0002184000{35I30{36{36{36{36{06500{06500{06500{06500{06500{06500{1261060 CI20031031371S5V219940101 226106006637{06500{06500{06625{06750{06875{05B00C04H05I06B06B11H11G11G11H11H11I0001169090I65{95{000125{0001328000{000190{18{18{18{18{18{18{06000{06000{06000{06000{06000{06000{1335271 CI20031031375HMU519960101 233527107500{07500{07500{07500{07500{07500{08B06B08E08F08F08F09D09D09D09D09E09E717375{464000{55{77{0001085500{0001085500{18{18{18{18{18{18{07000{07000{07000{07000{07000{07000{1440840 CL20031031380HV9519981101 244084006707{06500{06625{06750{06875{06875{27D03C28C29H30{30A06{05I06{06{06{06A615172I25{621000{673000{75{791000{36{36{36{36{36{36{06000{06000{06000{06000{06000{06000{1521993 CI20031031384E3A62101 252199306937{06875{06875{06875{07000{07000{12H02H12H13{13D13E04E04E04E04E04F04F0001129428F70{955000{000100{0002087000{0002087000{18{18{18{18{18{18{06500{06500{06500{06500{06500{06500{1538080 CL20031031384YXH42501 253808008875{08875{08875{08875{08875{08875{31I31I31I31I31I31I04A04A04A04A04A04A0001419300{0001419300{0001419300{0001419300{0001419300{0001419300{36{36{36{36{36{36{07000{07000{07000{07000{07000{07000{1659123 CI20031031390XG8720020801 265912306909{06750{06750{06875{07000{07125{16E15I16C16E16F16F01E01D01D01E01E01G998541G162000{792000{0001156500{000160{000199{18{18{18{18{18{18{06000{06000{06000{06000{06000{06000{" dput data2 c("1176552 CL20031031367RBV319920901
Re: [R] Labelling interaction axes of a nomogram using rms
Hi David, As suggested, here is some example code adapted from the example of the nomogram() from the rms package. You'll notice that variable labels are not being applied to main effects or interaction terms. Leonardo rm(list = ls()) # Import libraries require(Hmisc) require(rms) set.seed(12345) n <- 1000 # define sample size age <- rnorm(n, 0, 10) sbp <- rnorm(n, 120, 15) sex <- factor(sample(c(0,1), n, TRUE), levels=c(0,1), labels=c('female','male')) # Specify population model for log odds that Y=1 L <- 0.5*(sex=="male") + 0.01*age + 0.12*sbp + 0.02*sbp*age + rnorm(n, 0, 10) # Simulate binary y to have Prob(y=1) = 1/[1+exp(-L)] y <- ifelse(runif(n) < plogis(L), 1, 0) # Create a dataframe and apply nice labels to each variable. mydata <- data.frame(age, sbp, sex, y) var.labels <- c(age = "Patient Age - 50 years", sbp = "Systolic blood pressure", sex = "Sex", y = "Outcome") label(mydata) = lapply(names(var.labels), function(x) label(mydata[,x]) <- var.labels[x]) label(mydata) # show the labels. # Fit a model ddist <- datadist(mydata) options(datadist="ddist") f <- rms::lrm(y ~ age*sbp + sex) f f$coefficients # Create a nomogram. nom <- nomogram(f, fun=plogis, lp=F, nint=10, maxscale=100, interact = list( sbp=c(100,140,180) ), fun.at=c(.01,.05,seq(.1,.9,by=.1),.95,.99), funlabel="Risk of Death", vnames="labels") plot(nom) # end options(datadist=NULL) On Fri, Aug 26, 2016 at 10:35 PM, David Winsemiuswrote: > > > On Aug 26, 2016, at 11:53 AM, Leonardo Guizzetti < > leonardo.guizze...@gmail.com> wrote: > > > > Good afternoon, > > > > I have tried searching and have hit a wall with my own trial and error. I > > have been able to use "nice" labels for non-interacted variables by > setting > > them using Newlabels(), but I am unable to do so for the interaction > terms > > following a fit. > > > > Can you please offer a suggestion? > > My suggestion is that you post a minimal example. > > -- > David. > > > > Kind regards, > > Leonardo > > > > [[alternative HTML version deleted]] > > > > __ > > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > > https://stat.ethz.ch/mailman/listinfo/r-help > > PLEASE do read the posting guide http://www.R-project.org/ > posting-guide.html > > and provide commented, minimal, self-contained, reproducible code. > > David Winsemius > Alameda, CA, USA > > [[alternative HTML version deleted]] __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
Re: [R] Importint stata file and using value labels
There has been some good advice not to lose the labels, but perhaps this gets you where you seem determined to go? ?read.dta read.dta(file, convert.dates = TRUE, convert.factors = TRUE, missing.type = FALSE, convert.underscore = FALSE, warn.missing.labels = TRUE) or library(readstata13) ?read.dta13 read.dta13(file, convert.factors = TRUE, generate.factors = FALSE, encoding = NULL, fromEncoding = NULL, convert.underscore = FALSE, missing.type = FALSE, convert.dates = TRUE, replace.strl = FALSE, add.rownames = FALSE, nonint.factors = FALSE) Perhaps the convert. factors setting at FALSE? On 08/27/2016 10:55 AM, Michael Friendly wrote: On 8/26/2016 11:05 AM, Juan Ceccarelli Arias wrote: Yep. Im a bit stalled. I can't find the option to import only the values and drop the value labels from the dta file. Im quite sure R can do that. Then i'd only used the values and i'd rely on my memory. It isn't a bad alternative. Hint: use str() to see the class of what you've read. Then try as.data.frame() on the resulting object read from the .dta file. __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
Re: [R] Leaflet package error while adding Polygons
On 26/08/2016 9:20 PM, Jaya Krishnan wrote: Hi, I'm trying to use leaflet for web-mapping. While trying to add polygons, I get this error Error in `*tmp*`$x : $ operator is invalid for atomic vectors Any help is appreciated. You need to post what you did if you want help. Avoiding HTML is also a recommendation of the posting guide (see the footer for the URL). Duncan Murdoch Thanks, Jaya [[alternative HTML version deleted]] __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
[R] Leaflet package error while adding Polygons
Hi, I'm trying to use leaflet for web-mapping. While trying to add polygons, I get this error Error in `*tmp*`$x : $ operator is invalid for atomic vectors Any help is appreciated. Thanks, Jaya [[alternative HTML version deleted]] __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
Re: [R] Importint stata file and using value labels
On 8/26/2016 11:05 AM, Juan Ceccarelli Arias wrote: Yep. Im a bit stalled. I can't find the option to import only the values and drop the value labels from the dta file. Im quite sure R can do that. Then i'd only used the values and i'd rely on my memory. It isn't a bad alternative. Hint: use str() to see the class of what you've read. Then try as.data.frame() on the resulting object read from the .dta file. -- Michael Friendly Email: friendly AT yorku DOT ca Professor, Psychology Dept. & Chair, Quantitative Methods York University Voice: 416 736-2100 x66249 Fax: 416 736-5814 4700 Keele StreetWeb: http://www.datavis.ca Toronto, ONT M3J 1P3 CANADA __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
Re: [R] Hickman models with two binary dependent variables in R
Dear Arne, Many thanks for this, It actually worked with heckit() command as well, do I need to use selection()? Also, I would be really grateful if you can suggest a package that would allow for estimation of heckman models with two ordered variables (0-1-2). Can sampleSelection handle this? Warm regards, Faradj > 27 aug. 2016 kl. 10:39 skrev Arne Henningsen: > > See also: > > http://r-forge.r-project.org/forum/forum.php?thread_id=31866_id=844_id=256 > > > > On 26 August 2016 at 16:11, PIKAL Petr wrote: >> Hi >> >> See in line >> >>> -Original Message- >>> From: R-help [mailto:r-help-boun...@r-project.org] On Behalf Of Faradj >>> Koliev >>> Sent: Thursday, August 25, 2016 12:32 PM >>> To: r-help@r-project.org >>> Subject: [R] Hickman models with two binary dependent variables in R >>> >>> Hi everyone, >>> >>> How do I run Heckman models in R with two binary dependent variables? >>> >>> sampleSelection package in R works with standard heckman models ( binary >>> DV for the selection equation and continuous DV for the outcome equation). >>> In my case dependent variables are both binary (actually ordered but I >>> didn’t >>> find anything on that) >> >> From help page >> >> The endogenous variable of the argument 'selection' must have exactly two >> levels (e.g. 'FALSE' and 'TRUE', or '0' and '1'). By default the levels are >> sorted in increasing order ('FALSE' is before 'TRUE', and '0' is before >> '1'). This also applies for the binary outcome equation. For >> continuous-oucome cases, the dependent variable(s) should be numeric. >> >> seems to me that both equatio0ns can have binary values. >> >> >>> >>> So using sampleSelection package one could do this by running: >>> >>> SelectionEquation <- binaryDV1 ~ x1+x2+x3+x4 >>> >>> OutcomeEquation <- binaryDV2~o7+x1+x4+x5 >>> >>> HeckmanModel <- heckit(SelectionEquation,OutcomeEquation, >>> data=mydata, method="2step") >>> >>> >>> The problem is that heckit() doesn’t work here. I think in STATA one could >> >> What does it mean. Be more specific. >> >> And provide some data (preferably by dput). >> Or at least result of str(yourdata) to show that they are appropriate to the >> function. >> And do not post in HTML. >> >> Cheers >> Petr >> >>> use heckprob command for this. Anyone who knows more than me? >>> >>> Thanks! >>> >>> >>> >>> >>> >>> [[alternative HTML version deleted]] >>> >>> __ >>> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >>> https://stat.ethz.ch/mailman/listinfo/r-help >>> PLEASE do read the posting guide http://www.R-project.org/posting- >>> guide.html >>> and provide commented, minimal, self-contained, reproducible code. >> >> >> Tento e-mail a jakékoliv k němu připojené dokumenty jsou důvěrné a jsou >> určeny pouze jeho adresátům. >> Jestliže jste obdržel(a) tento e-mail omylem, informujte laskavě neprodleně >> jeho odesílatele. Obsah tohoto emailu i s přílohami a jeho kopie vymažte ze >> svého systému. >> Nejste-li zamýšleným adresátem tohoto emailu, nejste oprávněni tento email >> jakkoliv užívat, rozšiřovat, kopírovat či zveřejňovat. >> Odesílatel e-mailu neodpovídá za eventuální škodu způsobenou modifikacemi či >> zpožděním přenosu e-mailu. >> >> V případě, že je tento e-mail součástí obchodního jednání: >> - vyhrazuje si odesílatel právo ukončit kdykoliv jednání o uzavření smlouvy, >> a to z jakéhokoliv důvodu i bez uvedení důvodu. >> - a obsahuje-li nabídku, je adresát oprávněn nabídku bezodkladně přijmout; >> Odesílatel tohoto e-mailu (nabídky) vylučuje přijetí nabídky ze strany >> příjemce s dodatkem či odchylkou. >> - trvá odesílatel na tom, že příslušná smlouva je uzavřena teprve výslovným >> dosažením shody na všech jejích náležitostech. >> - odesílatel tohoto emailu informuje, že není oprávněn uzavírat za >> společnost žádné smlouvy s výjimkou případů, kdy k tomu byl písemně zmocněn >> nebo písemně pověřen a takové pověření nebo plná moc byly adresátovi tohoto >> emailu případně osobě, kterou adresát zastupuje, předloženy nebo jejich >> existence je adresátovi či osobě jím zastoupené známá. >> >> This e-mail and any documents attached to it may be confidential and are >> intended only for its intended recipients. >> If you received this e-mail by mistake, please immediately inform its >> sender. Delete the contents of this e-mail with all attachments and its >> copies from your system. >> If you are not the intended recipient of this e-mail, you are not authorized >> to use, disseminate, copy or disclose this e-mail in any manner. >> The sender of this e-mail shall not be liable for any possible damage caused >> by modifications of the e-mail or by delay with transfer of the email. >> >> In case that this e-mail forms part of business dealings: >> - the sender reserves the right to end
Re: [R] Hickman models with two binary dependent variables in R
See also: http://r-forge.r-project.org/forum/forum.php?thread_id=31866_id=844_id=256 On 26 August 2016 at 16:11, PIKAL Petrwrote: > Hi > > See in line > >> -Original Message- >> From: R-help [mailto:r-help-boun...@r-project.org] On Behalf Of Faradj >> Koliev >> Sent: Thursday, August 25, 2016 12:32 PM >> To: r-help@r-project.org >> Subject: [R] Hickman models with two binary dependent variables in R >> >> Hi everyone, >> >> How do I run Heckman models in R with two binary dependent variables? >> >> sampleSelection package in R works with standard heckman models ( binary >> DV for the selection equation and continuous DV for the outcome equation). >> In my case dependent variables are both binary (actually ordered but I didn’t >> find anything on that) > > From help page > > The endogenous variable of the argument 'selection' must have exactly two > levels (e.g. 'FALSE' and 'TRUE', or '0' and '1'). By default the levels are > sorted in increasing order ('FALSE' is before 'TRUE', and '0' is before '1'). > This also applies for the binary outcome equation. For continuous-oucome > cases, the dependent variable(s) should be numeric. > > seems to me that both equatio0ns can have binary values. > > >> >> So using sampleSelection package one could do this by running: >> >> SelectionEquation <- binaryDV1 ~ x1+x2+x3+x4 >> >> OutcomeEquation <- binaryDV2~o7+x1+x4+x5 >> >> HeckmanModel <- heckit(SelectionEquation,OutcomeEquation, >> data=mydata, method="2step") >> >> >> The problem is that heckit() doesn’t work here. I think in STATA one could > > What does it mean. Be more specific. > > And provide some data (preferably by dput). > Or at least result of str(yourdata) to show that they are appropriate to the > function. > And do not post in HTML. > > Cheers > Petr > >> use heckprob command for this. Anyone who knows more than me? >> >> Thanks! >> >> >> >> >> >> [[alternative HTML version deleted]] >> >> __ >> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide http://www.R-project.org/posting- >> guide.html >> and provide commented, minimal, self-contained, reproducible code. > > > Tento e-mail a jakékoliv k němu připojené dokumenty jsou důvěrné a jsou > určeny pouze jeho adresátům. > Jestliže jste obdržel(a) tento e-mail omylem, informujte laskavě neprodleně > jeho odesílatele. Obsah tohoto emailu i s přílohami a jeho kopie vymažte ze > svého systému. > Nejste-li zamýšleným adresátem tohoto emailu, nejste oprávněni tento email > jakkoliv užívat, rozšiřovat, kopírovat či zveřejňovat. > Odesílatel e-mailu neodpovídá za eventuální škodu způsobenou modifikacemi či > zpožděním přenosu e-mailu. > > V případě, že je tento e-mail součástí obchodního jednání: > - vyhrazuje si odesílatel právo ukončit kdykoliv jednání o uzavření smlouvy, > a to z jakéhokoliv důvodu i bez uvedení důvodu. > - a obsahuje-li nabídku, je adresát oprávněn nabídku bezodkladně přijmout; > Odesílatel tohoto e-mailu (nabídky) vylučuje přijetí nabídky ze strany > příjemce s dodatkem či odchylkou. > - trvá odesílatel na tom, že příslušná smlouva je uzavřena teprve výslovným > dosažením shody na všech jejích náležitostech. > - odesílatel tohoto emailu informuje, že není oprávněn uzavírat za společnost > žádné smlouvy s výjimkou případů, kdy k tomu byl písemně zmocněn nebo písemně > pověřen a takové pověření nebo plná moc byly adresátovi tohoto emailu > případně osobě, kterou adresát zastupuje, předloženy nebo jejich existence je > adresátovi či osobě jím zastoupené známá. > > This e-mail and any documents attached to it may be confidential and are > intended only for its intended recipients. > If you received this e-mail by mistake, please immediately inform its sender. > Delete the contents of this e-mail with all attachments and its copies from > your system. > If you are not the intended recipient of this e-mail, you are not authorized > to use, disseminate, copy or disclose this e-mail in any manner. > The sender of this e-mail shall not be liable for any possible damage caused > by modifications of the e-mail or by delay with transfer of the email. > > In case that this e-mail forms part of business dealings: > - the sender reserves the right to end negotiations about entering into a > contract in any time, for any reason, and without stating any reasoning. > - if the e-mail contains an offer, the recipient is entitled to immediately > accept such offer; The sender of this e-mail (offer) excludes any acceptance > of the offer on the part of the recipient containing any amendment or > variation. > - the sender insists on that the respective contract is concluded only upon > an express mutual agreement on all its aspects. > - the sender of this e-mail informs that he/she is not authorized to enter > into any