Surface BOP Vertical Well Kill Sheet (API Field Units)

Atheer Al Attar, Iraq
Sep 25, 2016

Background Information

  • We all heard about the Deep Water Horizon accident in 2010 by BP.

  • This type of accident is called Blow Out, in Petroleum Engineering there is a series of calculations you have to perform to control the well.

  • These calculations are called Kill Sheet

DDD

Calculation Sample

  • Calculation sheet contains mainly input boxes and reactive elements
  • Afte the calculation is done, a table and plot will be created.
 output$imaasp <- reactive({(c()-input$cmw)*input$tvd*.052})
  #Drill Pipe
  vtoldrlp<-reactive({input$drlplngth*input$drlpvol})
    output$vtoldrlp<-reactive(vtoldrlp())
    #HWDP
  hvtoldrlp<-reactive({input$hdrlplngth*input$hdrlpvol})
    output$hvtoldrlp<-reactive(hvtoldrlp())
    #DC
  vtoldrlc<-reactive({input$drlclngth*input$drlcvol})
    output$vtoldrlc<-reactive(vtoldrlc())
    #Drill String
  dsvol<-reactive(vtoldrlp()+hvtoldrlp()+vtoldrlc())
  output$dsvol<-reactive(vtoldrlp()+hvtoldrlp()+vtoldrlc())

```

Plotting

Problem I have faced during the project

  • Issues in reading an element from a reactivate data.frame
  • Issues in creating tabs
  • Issues in Plotting
  • All of them solved except the first one
  • You can check the GitHub here