Expiring Today—Celebrate National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x

R

R is a programming language and environment used primarily for statistical data analysis.

Share tech news, updates, or what's on your mind.

Sign up to Post

I have this query that returns the count within each dollar range of quotes. I would like to add the sum of the dollar value of those quotes as well. Is that possible within this one query? If so, how would you do it?

SELECT T.RANGE AS [Range_Value],COUNT(*) AS [Number_of_Quotes]
FROM (
      SELECT CASE
            WHEN CONT_AMNT >=0 AND CONT_AMNT <= 1000 THEN ' 1) $0-$1000'
            WHEN CONT_AMNT >1000   AND CONT_AMNT <= 5000 THEN ' 2) $1000-$5000'
            WHEN CONT_AMNT >5000   AND CONT_AMNT <= 10000 THEN ' 3) $5000-$10000'
            WHEN CONT_AMNT >10000  AND CONT_AMNT <= 50000 THEN ' 4) $10000-$50000'
            WHEN CONT_AMNT >50000  AND CONT_AMNT <= 100000 THEN ' 5) $50000-$100000'
            WHEN CONT_AMNT >100000 AND CONT_AMNT <= 150000 THEN ' 6) $100000-$150000'
            WHEN CONT_AMNT >150000 AND CONT_AMNT <= 200000 THEN ' 7) $150000-$200000'
            WHEN CONT_AMNT >200000 AND CONT_AMNT <= 500000 THEN ' 8) $200000-$500000'
            WHEN CONT_AMNT >500000 AND CONT_AMNT <= 1000000 THEN ' 9) $500000-$1000000'
            WHEN CONT_AMNT >1000000 THEN '10) $1000000+'
     END AS RANGE
       FROM (
         SELECT SUM(TOTAL_SELL_PRC) AS CONT_AMNT,CUSTOMER_NUMBER AS CUSTNMBR
   FROM [CSTQUTHD]
   WHERE DATE_OF_QUOTE>= '2016/01/01' AND DATE_OF_QUOTE<'2016/12/31'
   GROUP BY CUSTOMER_NUMBER) R ) T
   GROUP BY T.RANGE
0
Technology Partners: We Want Your Opinion!
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

I dont think SQL can store a table with 190,005 columns and 5000 Rows.

What I have now.
Right now what I have is a table with 5001 observations. Each observation has 190,005 possible scenarios.  That's 950,215,005 rows.

My objective.
I would like to pivot this table so my observations is the first column and all the possible outcomes are columns.
The observation is an int and the possible observations are bit (basically yes or no for outcome).

I am using Microsoft SQL server 2016.

My goal.
I am trying to create a matrix to do correlation analysis. I will be bring the data into R some how i am sure that's going to be a challenge as well.

If SQL cant do it that's fine but how then can I get this data into a Text file from SQL?

Basically Type becomes columns and isTrue flag is now going horizontal so there is 1 row per Key. Remember there are 190,005 different Types for each member. Yes I do know every possible Type value. For the sake of this example I didnt think it would be wise to list all 190,005.
Here are my columns
Key, Type, isTrue
1,V3201,1
1,F123,0
1,S20341,0
2,99080,1
2,R4570,1
2,S26995,0
3,D4567,0
3,SX34526,0
3,F5678,1
3,E9807,1
3,ST5688,0

Open in new window


Thank you in advance for your help.
0
I am getting the following error when running make while trying to cross-compile OpenSSL:

make[1]: mips-linuxar: Command not found
Makefile:652: recipe for target 'libcrypto.a' failed
make[1]: *** [libcrypto.a] Error 127
make[1]: Leaving directory '/home/dev/openwrt/package/openssl-1.1.0f'
Makefile:128: recipe for target 'all' failed
make: *** [all] Error 2


From the Makefile:

PLATFORM=linux-generic32
OPTIONS=--cross-compile-prefix=mips-linux no-asan no-crypto-mdebug no-crypto-mdebug-backtrace no-ec_nistp_64_gcc_128 no-egd no-fuzz-afl no-fuzz-libfuzzer no-heartbeats no-md2 no-msan no-rc5 no-sctp no-ssl-trace no-ssl3 no-ssl3-method no-ubsan no-unit-test no-weak-ssl-ciphers no-zlib no-zlib-dynamic
CONFIGURE_ARGS=("linux-generic32", "--cross-compile-prefix=mips-linux")

ARFLAGS=
AR=$(CROSS_COMPILE)ar $(ARFLAGS) r


Line 652
      $(AR) $@ $?

I am new to this. Please tell me how I can make this question more useful.

Thank you.
Makefile
Configure
0
How to find the returns of multiple, irregular inflows & outflows over a short period, lets say in 4 months?

I don't want to use the XIRR as it gives the compounded annualized return, which will be misleading. I want to calculate the returns for the duration of the investment only.

For eg., please refer to the attached excel sheet which lists out 5 transactions of Buy & Sell over 4 months period.

Thanks and regards

R
Question.xlsx
0
I run VMware 6.0 one of my ESXI hosts lose two datastores
This host has 4 datastores 3 are local ATA drives and one is NFS
Two 0f the ATA drives are Dead or Error.
If I restart the ESXI Host they come back.

I swapped the drives out with two other drives and the same thing happened Dead or Error after about 24 hours.

I was lucky to have Veeam B& R nd I was able to recover the VMs on those two datastores.

Is my ESXi host corrupted ? or do you guys think I have a hardware problem

I found this
http://www.enterprisedaddy.com/2017/06/datastore-shows-inactive-unplanned-pdl/

And ran those commands but I had no VMS running on these datastores

Maybe if I put the original drives back in the results may be different I would rather keep the existing drives in now

If there some sort of cache or something I need to clear on this host?

Thanks Tom
0
Please look at the following VBA code that relates to the attached spreadsheet. The relevant section of this sub is the second paragraph where the first line comment is 'Delete all data in the "TME" tab older than one week. The other paragraphs of this sub work fine as far as I can tell.

This section of the sub refers to the attached sheet, which is the TME tab of a much larger workbook. As you see, the intent of this section of the sub is to delete all records on the TME sheet older than one week from TODAY (the date in column I, Row 1 or relative cell 1,9). For reference, the formula in I1 is =(TODAY()-MOD(TODAY()-1,7))-3. This formula works fine - no need to change it.

The problem is that this second paragraph of the sub below does not actually do any deleting of rows. It also does not stop execution for any errors, but proceeds right on to the next section of the sub without doing anything. I want it to delete all rows from row 2 of the attached sheet and continue deleting until the date in column A is one week older than the date in cell I1.

What needs to be changed to this section of the sub to get it to properly delete the required rows?

Thanks!

Glenn S.
----------------------------------------------------------------------------------------------------------------------------------------------------------------------
Sub sub1()
'Import the daily data from the Cognos extract
Dim rng As Range, region As Range, col As Range
Dim rcount As Long, r As …
0
I need to ensure ALL mandatory cells in a row are filled in before another row is added.  Please see attached file for example.  
I've intentionally left blank columns I, O, R and S.  
Before I add a second row, I'd like to see an error message identifying the unfilled cells, or even better those unfilled cells highlighted.
If this is not able to be done, any suggestions are most welcome.
EE-Assets-Multi-Road-Template.xlsx
0
I have a code that generates a serial number.
Dim ws As Worksheet
    Dim r As Long
    Dim ReqNo As String
    Set ws = Worksheets("MainRecord")
getNum:
    r = ws.Cells(ws.Rows.Count, "C").End(xlUp)
    ReqNo = r + 1
    If IsNumeric(Application.Match(ReqNo, Worksheets("MainRecord").Range("C:C"), False)) Then GoTo getNum
    On Error Resume Next
    Me.REQUESTNO.Value = ReqNo

It can pull up but only number but when I format my codes using these format

Dim ws As Worksheet
    Dim r As Long
    Dim ReqNo As String
    Set ws = Worksheets("MainRecord")
getNum:
    r = ws.Cells(ws.Rows.Count, "C").End(xlUp)
  ReqNo = "RAS17" &  format(r + 1,"00")
    If IsNumeric(Application.Match(ReqNo, Worksheets("MainRecord").Range("C:C"), False)) Then GoTo getNum
    On Error Resume Next
    Me.REQUESTNO.Value = ReqNo

I am getting an error because maybe of the ISnumeric  code.

I ll be glad if you can help me with this.21223.JPG
0
Hi,

Im hoping someone can help me. I have the below code with I am using to take screenshots and open up a draft email in Excel with the screenshot in the main body. But the screenshot is really small. I think this is to do with the actual Excel sheet been zoomed to 70% but it doesn't change when I set it back to 100%. Is there any way of writing in the code, or can someone amend my cose so it resizes the picture? The code is...

Private Sub CommandButton1_Click()
'Copy range of interest
Dim r As Range
Set r = Range("B3:N40")
r.Copy

'Paste as picture in sheet and cut immediately
Dim p As Picture
Set p = ActiveSheet.Pictures.Paste
p.Cut

'Open a new mail item
Dim outlookApp As Outlook.Application
Set outlookApp = CreateObject("Outlook.Application")
Dim outMail As Outlook.MailItem
Set outMail = outlookApp.CreateItem(olMailItem)

'Get its Word editor
outMail.Display
Dim wordDoc As Word.Document
Set wordDoc = outMail.GetInspector.WordEditor

'Paste picture
wordDoc.Range.Paste
End Sub
______________________________________________________________
Many thanks in advance.
0
Hello,
I have the following query returning results on faculty members by group by facultyid, fname and lname.  The results are displayed in a table on a secured site.  What I need to do next is insert a page break once the facultyid does not match so faculty can print each group on a separate page.  The query is below:

$printqry ="select C.facultyid,S.fname+' '+ S.lname as 'Faculty Name', C.sname, Q.qualify_name, R.fname+' '+ R.lname as Reviewer, C.lastupdate as 'Date and Time Updated'
from courserating as C,FQS_STaff as S,Qualify as Q, Review_Team as R
where
C.facultyid = S.id and
C.rating = Q.id and
C.reviewerid = R.id  
and C.reviewerid = ".$_SESSION['reviewer']." and  convert(date,C.lastupdate) = convert(date,getdate())
group by S.lname, S.fname,C.sname, Q.qualify_name, R.lname, R.fname, C.lastupdate, C.facultyid
order by S.lname, S.fname  ";

while(odbc_fetch_row($printqrydo))
{
    $facultyid = odbc_result($printqrydo,1);
    $facultyname = odbc_result($printqrydo,2);
    $sectionname = odbc_result($printqrydo,3);
    $qualifyrating = odbc_result($printqrydo,4);
    $reviewername = odbc_result($printqrydo,5);
    $lastupdate_db = odbc_result($printqrydo,6);
             
                 
        echo '<tr class="break"><td  >'.$facultyname.'</td> <td >'.$sectionname.'</td><td>'.$qualifyrating.'</td><td>'.$reviewername.'</td>
       <td>'.$lastupdate_db.'</td></tr>';
 
}
 

i tried a number of solutions and can't seem to get it to …
0
Concerto Cloud for Software Providers & ISVs
LVL 4
Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Hi,

I have attached a spreadsheet with some code and functions, but I want to know if I can achieve the following.

Spreadsheet has 7 tabs.  The tabs I am interested in is tabs 2 - 7

Each tab has one row of data.  Now if you go to tab 2 - Risks, the go to column J and in the dropbox click Action.  You will now see that the row has gone.

Go to the Action tab, and you will see that the row appears here, and that is correct.  I column B you will see an R.  As it was moved from the Risk tab, it was enetered as a R for Risk.  But as it now resideds in Action, I want the cell automatically update to an A.

This movement and changes will only aplly for rows that move between Tabs 2-4,  Risk, Action, Isse and Dependancy.

Please let me know if any more info is needed.
Sample-Project-Raid-Log-0.1a.xlsm
0
private void FileDataRequest(StreamedFileDataRequest r)

{

MemoryStream m = new MemoryStream();

r = m.AsOutputStream as StreamedFileDataRequest;
}
void loop(){
StorageLibrary l = await StorageLibrary.GetLibraryAsync(FromKnownId.Pictures);

Scrollviewer scrollviewer = new Scrollviewer();

RenderTargetBitmap r = null;

 r = new RenderTargetBitmap();

                await r.RenderAsync(scrollviewer);

                

                var file0 = await l.SaveFolder.CreateFileAsync("poikidiki");

                await FileIO.WriteBufferAsync(file0, await r.GetPixelsAsync());

                Windows.Storage.Streams.IRandomAccessStream b = await file0.OpenAsync(FileAccessMode.ReadWrite);

               

                var file = await StorageFile.CreateStreamedFileAsync("effort06.jpg", new StreamedFileDataRequestedHandler(FileDataRequest),Windows.Storage.Streams.RandomAccessStreamReference.CreateFromFile(file0));





   

              
                await file.CopyAsync(l.SaveFolder);

}

Open in new window

I have this:

it doesn't copy the bytes to the streamed file.

help appreciated
0
Hi ,

I am passing list value into the datatable.

I want to find the column first and then check whether the value exist or not for that columns.

I want to write in LINQ Query as bool true/false

for example,

string str ABSCHECK = ABS A#ABS B // input value

string[] words1 = str.Split('#'); //Splitting the values

words1[0] ABS A //list

           [1] ABS B

The above two value is a column name and i want to check in the below table.

 DTTABLE :

A      ABS A(MN)      ABS A(MX)      ABS B(MN)      ABS B(MX)      ABS C(MN)      ABS C(MX)
100      100      100      100      100      100      100
For ABS A ==> Matching two columns and values present(like ABS A(MN) and ABS A(MX))

For ABS B ==> Matching two columns and values exists (like ABS B(MN) and ABS B(MX))

So i want to return result is true.

if nothing is matching, it means (column not identified and value not present) returns false.

How to write LINQ..?

below is my query

string str ABSCHECK = ABS A#ABS B // input value

string[] words1 = str.Split('#'); //Splitting the values

bool results = (from r in DTTABLE.AsEnumerable()
                           select r.Field<string>(words1.ToList())); // to find out columns and value

but not working..?
0
These are the codes that are currently working in pulling up the data.
Me.ADDRESS.Value = Sheet1.Range("Ax" & r).Value
Me.ADDRESS.Value = Sheet1.Range("Aw" & r).Value
Me.REMARKS.Value = Sheet1.Range("AY" & r).Value
Me.Image1.Picture = LoadPicture(Worksheets("Sheet1").Range("AZ" & r))  'Where r is the row number

Now I am using these codes to update the file.
Sheet1.Range("AV" & r).Value = Me.RELATION.Value
Sheet1.Range("AW" & r).Value = Me.MOBILE1.Value
Sheet1.Range("AX" & r).Value = Me.ADDRESS.Value
Sheet1.Range("AY" & r).Value = Me.REMARKS.Value
(Need code for the update of picture here....)
I tried these code to update the picture but it won't work.
Worksheets("Sheet1").Range("AZ" & r).picture=me.loadpicture.image1
I already tried to invert but still its not working.
0
I have what I thought was a well prepared dataset.  I wanted to use the Apriori Algorithm in R to look for associations and come up with some rules.  I have about 16,000 rows (unique customers) and 179 columns that represent various items/categories.  The data looks like this:

Cat1  Cat2  Cat3  Cat4  Cat5 ... Cat179
1,        0,       0,        0,      1,     ...  0
0,        0,       0,        0,      0,     ...  1
0,        1,       1,        0,      0,     ...  0
...

I thought having a comma separated file with binary values (1/0) for each customer and category would do the trick, but after I read in the data using:

>data5 = read.csv("Z:/CUST_DM/data_test.txt",header = TRUE,sep=",")

and then run this command:

> rules = apriori(data5, parameter = list(supp = .001,conf = 0.8))

I get this error:

Error in asMethod(object):
column(s) 1, 2, 3, ...178 not logical or a factor. Discretize the columns first.  

I understand Discretize but not in this context I guess.  Everything is a 1 or 0.  I've even changed it from INT to CHAR and received the same error.  I also had the customer ID (unique) in column 1 but I understand that isn't necessary when the data is in this form (flat file). I'm sure there is something obvious I'm missing - I'm new to R.

What am I missing?  Thanks for your input.
0
I'm in the Business Intelligence Department, but practically speaking we're the Reporting Department, your basic operational type of reports - lists, lists, and more lists.

I'm at an institution of higher learning, and a new project has come up for the Math Department. They want to know relationships between courses, grades, etc.

Examples:

- if someone gets a D in Calc I, what's the likelihood of graduation?  with various permutations, like taking Calc I again
- what's the likelihood of someone getting a D in Calc I, getting a D or F in Calc II
- for placing incoming students in Pre-Calc or Calc I, what are the factors that indicate success? such as Verbal SAT

So I think I've targeted the right discipline (Analytics), but not sure where to take this project.
1
I need some advice in writing below query: I used to have joins before in the below query. I am re-writing that query using CTE. But i am not getting expected results. Query is:

WITH PERS_ADDRESS
     AS (SELECT PERS_ID,
                ZIP_CODE_NUM,
                ROUTER_CALL_DAY_IDENTIF,
                ROUTER_CALL_IDENTIF,
                created_on,
                LANG_CODE
           FROM (  SELECT PA.PERS_ID,
                          ZIP_CODE_NUM,
                          CL.ROUTER_CALL_DAY_IDENTIF,
                          CL.ROUTER_CALL_IDENTIF,
                          cl.created_on,
                          CL.LANG_CODE,
                          ROW_NUMBER ()
                             OVER (PARTITION BY PA.PERS_ID ORDER BY END_DATE)
                             AS R
                     FROM call_log@ATLG03 CL
                          LEFT JOIN PERS_ADDR@ATLG03 PA
                             ON PA.PERS_ID = CL.PERS_ID
                          LEFT JOIN ADDR@ATLG03 AD ON AD.ID = PA.ADDR_ID
                    WHERE     PA.END_DATE > SYSDATE
                          AND (    CL.ROUTER_CALL_DAY_IDENTIF IS NOT NULL
                               AND CL.ROUTER_CALL_IDENTIF IS NOT NULL)
                          AND cl.created_on >=
                                 TO_DATE ('03/16/2017', 'mm/dd/yyyy')
                          AND cl.created_on <
                                 TO_DATE ('03/17/2017', 'mm/dd/yyyy') + 1
                          AND

Open in new window

0
Team, need help resolving a laptop build that's continously failing at the bitlocker stage of task sequence, it's specific to just this model laptop, and I suspect it's related to some BIOS config.
Can you advise or direct me please,
Laptop Model = HP Elite X2 1012

______________________________________________________________________________________________________________________________________________
Error in logs:

... r
Initial TPM state: 55
Creating TPM owner authorization value
Succeeded loading resource DLL 'C:\Windows\CCM\1033\TSRES.DLL'
Taking ownership of TPM
uStatus == 0, HRESULT=80070005 (e:\nts_sccm_release\sms\framework\tscore\tpm.cpp,645)
pTpm->TakeOwnership( sOwnerAuth ), HRESULT=80070005 (e:\nts_sccm_release\sms\client\osdeployment\bitlocker\bitlocker.cpp,522)
InitializeTpm(), HRESULT=80070005 (e:\nts_sccm_release\sms\client\osdeployment\bitlocker\bitlocker.cpp,1313)
ConfigureKeyProtection( keyMode, pwdMode, pszStartupKeyVolume ), HRESULT=80070005 (e:\nts_sccm_release\sms\client\osdeployment\bitlocker\bitlocker.cpp,1552)
pBitLocker->Enable( argInfo.keyMode, argInfo.passwordMode, argInfo.sStartupKeyVolume, argInfo.bWait ), HRESULT=80070005 (e:\nts_sccm_release\sms\client\osdeployment\bitlocker\main.cpp,382)
'TakeOwnership' failed (2147942405)
Failed to take ownership of TPM. Ensure that Active Directory permissions are properly configured
ccess is denied. (Error: 80070005; Source: Windows)
0
Hi Do you know where I can install MS R MS SQL Server 2016?
I assume it is free. Am I right?
0
Concerto's Cloud Advisory Services
LVL 4
Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Hey its supposed to load pdf from a IRandomAcessStream;


but no work says "invalid parameter" on underlined and bold line;

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Runtime.InteropServices.WindowsRuntime;
using Windows.Foundation;
using Windows.Foundation.Collections;
using Windows.UI.Xaml;
using Windows.UI.Xaml.Controls;
using Windows.UI.Xaml.Controls.Primitives;
using Windows.UI.Xaml.Data;
using Windows.UI.Xaml.Input;
using Windows.UI.Xaml.Media;
using Windows.UI.Xaml.Navigation;
using Windows.Storage;
using Windows.Data.Pdf;

// The Blank Page item template is documented at http://go.microsoft.com/fwlink/?LinkId=402352&clcid=0x409

namespace App73
{
    /// <summary>
    /// An empty page that can be used on its own or navigated to within a Frame.
    /// </summary>
    public sealed partial class MainPage : Page
    {
        public MainPage()
        {
            this.InitializeComponent();

            button_Get.Tapped += Button_Get_Tapped;
        }

        private async void Button_Get_Tapped(object sender, TappedRoutedEventArgs e)
        {
            MemoryStream mem = new MemoryStream(File.ReadAllBytes(@filename.Text));

            Windows.Storage.Streams.IRandomAccessStream r = mem as Windows.Storage.Streams.IRandomAccessStream;

          [b]  PdfDocument dc = await PdfDocument.LoadFromStreamAsync(r);

[/b]
         

           

           
0
My procedure is passed a comma-separated list of IDs, for example 7369,7499,7839,7902. I tried to use it in my code like this:

declare
   p_empno_list constant varchar2(20) := '7369,7499,7839,7902';
begin
   for r in (
      select * from emp
      where  empno in (p_empno_list)
   )
   loop
      dbms_output.put_line(rpad(r.empno,9) || r.ename);
   end loop;
end;
/
but it just gives me an error:1 When SQL is expecting a character string such as SMITH, but is passed a comma-separated list such as SMITH,JONES,FORD,MILLER, no error is produced, but the query simply returns no rows.

ERROR at line 1:
ORA-01722: invalid number
ORA-06512: at line 4

How can i convert CSV to list so that it can be accepted in IN- clause?
0
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Runtime.InteropServices.WindowsRuntime;
using Windows.Foundation;
using Windows.Foundation.Collections;
using Windows.UI.Xaml;
using Windows.UI.Xaml.Controls;
using Windows.UI.Xaml.Controls.Primitives;
using Windows.UI.Xaml.Data;
using Windows.UI.Xaml.Input;
using Windows.UI.Xaml.Media;
using Windows.UI.Xaml.Navigation;
using Windows.Storage;
using Windows.Data.Pdf;

// The Blank Page item template is documented at http://go.microsoft.com/fwlink/?LinkId=402352&clcid=0x409

namespace App73
{
    /// <summary>
    /// An empty page that can be used on its own or navigated to within a Frame.
    /// </summary>
    public sealed partial class MainPage : Page
    {
        public MainPage()
        {
            this.InitializeComponent();

            button_Get.Tapped += Button_Get_Tapped;
        }

        private async void Button_Get_Tapped(object sender, TappedRoutedEventArgs e)
        {
            MemoryStream mem = new MemoryStream(File.ReadAllBytes(@filename.Text));

            Windows.Storage.Streams.IRandomAccessStream r = mem as Windows.Storage.Streams.IRandomAccessStream;

            PdfDocument dc = await PdfDocument.LoadFromStreamAsync(r);



         
           


        }
    }
}
it doesn't debug .don't know why???
0
Hello, needing some help here.

Cell Sheet5 B13 and C13 has values that represent temperature and dewpoint in Fahrenheit.  I need to convert each value into Celsius, the formala is 5/9*(Temp-32).  Then for the first value I need to use this formula 6.11*10.0**(7.5*Tc/(237.7+Tc)), where Tc is the value.  Then for the second value I need 6.11*10.0**(7.5*Tdc/(237.7+Tdc)), where Tdc is the second value.  Finally I need to divide the number from the second equation by the number in the first equation and times it by 100.

Finally, I need to computer =16.923+(Temp*1.85212*(10^-1))+(5.37941*RH)-((Temp*RH)*1.00254*(10^-1))+((Temp^2)*9.41695*(10^-3))+((RH^2)*7.28898*(10^-3))+((Temp^2)*RH*3.45372*(10^-4))-(Temp*(RH^2)*8.14971*(10^-4))+((RH^2)*(Temp^2)*1.02102*(10^-5))-((Temp^3)*3.8646*(10^-5))+((RH^3)*2.91583*(10^-5))+(RH*(Temp^3)*1.42721*(10^-6))+((RH^3)*Temp*1.97483*(10^-7))-((RH^2)*(Temp^3)*2.18429*(10^-8))+((RH^3)*(Temp^2)*8.43296*(10^-10))-((RH^3)*(Temp^3)*4.81975*(10^-11)).  Temperature is the original Fahrenheit value and RH is what we calculated above.


Trying to shoot for some type of function as I will need to use this to calculate multiple cells.  Thanks in advance for you help.
0
well it is supposed to be a map guide:

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Runtime.InteropServices.WindowsRuntime;
using Windows.Foundation;
using Windows.Foundation.Collections;
using Windows.UI.Xaml;
using Windows.UI.Xaml.Controls;
using Windows.UI.Xaml.Controls.Primitives;
using Windows.UI.Xaml.Data;
using Windows.UI.Xaml.Input;
using Windows.UI.Xaml.Media;
using Windows.UI.Xaml.Navigation;
using Windows.Devices.Geolocation;
using Windows.Services.Maps;

// The Blank Page item template is documented at http://go.microsoft.com/fwlink/?LinkId=402352&clcid=0x409

namespace App50
{
    /// <summary>
    /// An empty page that can be used on its own or navigated to within a Frame.
    /// </summary>
    public sealed partial class MainPage : Page
    {
        public MainPage()
        {
            this.InitializeComponent();

            _map.Tapped += _map_Tapped;
        }

        private void _map_Tapped(object sender, TappedRoutedEventArgs e)
        {
            BasicGeoposition b = new BasicGeoposition();

            b.Latitude = Convert.ToSingle(_latitude.Text);

            b.Longitude = Convert.ToSingle(_longitude.Text);

            Geopoint p = new Geopoint(b);

            MapLocationFinderResult r = MapLocationFinder.FindLocationsAtAsync(p).GetResults();

            foreach(var vari in r.Locations)
            {

                _result.Text = …
0
Hi,
I have a spreadsheet where a User keeps track of numbered Jobs.
The current Userform can be updated with more information as Jobs progress.

Is there any way to write back the data in a different font or colour ?
We want to use "strikeout" font on cancelled Jobs (rather than have a new field in the spreadsheet).
I will put a "cancelled Job" button on the Userform for this purpose (with all the appropriate controls).

Example of current code to write back data is:

r = worksheetfunction.match(Val(JobBox), Ws.columns(1), 0)
currentrow = r
Me.firstnamebox = ws.cells(r, "b")
Me.lastnamebox = ws.cells(r, "c")
Me.Phonebox = ws.cells(r, "d")
Me.AgeBox = ws.cells(r, "e")
....etc,etc

cheers (P.S. Have not done this forum stuff for a zillion years so a bit out of date )
0

R

R is a programming language and environment used primarily for statistical data analysis.

Top Experts In
R
<
Monthly
>