Description Usage Arguments Value Examples
View source: R/period_average.R
The signal of transiting planets is very weak, especially if the planet is small. This function amplifies it by exploiting the periodicity of the signal. All observations times are taken modulo the period and then binned. An average is then taken within each bin, those averages then stored as a vector and returned. If the orbital period of an exoplanet (or an integer fraction thereof) is used as argument for "period", the signal to noise ratio of the transit is improved, which can allow for the planet's detection.
1 | period_average(data, period)
|
data |
A dataframe with one column named "Day" and the other "Brightness", such as Kepler10965588 (included in the package). |
period |
A numeric which is larger than 0 representing the period (in days) which is to be examined. |
A vector of numerics.
1 2 3 4 5 6 7 8 9 | library(anomaly)
data(Lightcurves)
### Plot the data for Kepler 10965588: No transit apparent
plot(Lightcurves$Kepler10965588$Day,Lightcurves$Kepler10965588$Brightness,xlab = "Day",pch=".")
### Examine a period of 62.9 days for Kepler 10965588
binned_data = period_average(Lightcurves$Kepler10965588,62.9)
inferred_anomalies = anomaly_series(binned_data)
plot(inferred_anomalies,xlab="Bin")
# We found a planet!
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.